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ARCHIVIO 


Schedario evoluto e veloce, per¬ 
sonalizzabile. Ricerche multichia- 
ve, sort, aggiornamenti numerici 
automatici, calcolatrice, stampe 
personalizzabili etc. 


GRAFICI 

Tre tipi di grafici: barre, linee, torta 
con personalizzazione di diciture, 
valori e scale 2 o 3 dimensioni. 
Stampe e comparazioni. 


TESTI 

Potentissimo editore di testi con 
righelli, taglia, copia, incolla, giusti¬ 
ficazioni e word-wrap. Passaggio 
dei testi all’archivio per un autenti¬ 
co mail-merge. 


Completamente in italiano - by HL software - Horizontal Line Software 
distribuito da EMS - via Dalmazia,2 - 27029 Vigevano ^rilS — 





















Macnews 

Tantissimi programmi: due grafici, due didattici, due di scienza delle 
costruzioni; e poi un compilatore e una fonte inesauribile di segni e 
simboli. E l'hardware: drive esterno, RAM disk, tunderscan... 


Effetti speciali 

L’importanza di una gradevole presentazione non va sottovalutata, 
quando si realizza un programma. Spinner consente lo scorrimento 
orizzontale di una stringa, per vivacizzare un menù, un titolo, oppure... 


Stampanti 

Ad aghi o a margherita? Termiche, a getto o laser? Una rassegna 
completa dei tipi di stampanti, con le loro caratteristiche tecniche e le 
loro prestazioni, e dei relativi accessori. E una eccezionale tabella 
comparativa, con tutti i dati, di trenta macchine provate su strada. 


sommari 


H Impegni 

^L Che le pòli 
I stesso vali 


Che le pòlizze scadono si sa; il problema è ricordarsi quando. E lo 
stesso vale per anniversari e compleanni. Per avere sempre sotto gli 
occhi un promemoria elettronico, ecco un calendario da scrivania. 


Basic 

Garbage collection e strutture hash: la seconda puntata sulla 
programmazione avanzata in Basic presenta sette nuovi trucchi... 


Catalogo con Mac 

Come realizzare in casa un catalogo, completo di foto e ben ordinato, 
decisamente professionale? Con Macintosh, telecamera e stampante è 
possibile ottenere un prodotto di alta qualità a costi contenuti. 


One-liners 

Equazioni di secondo grado, calendario, bioritmi, estrazione del lotto e 
calcolo degli integrali. E poi i giochi: un provariflessi e uno slalom. Infine 
un programma che gioca con le parole e due routine grafiche. 


Calendario 

Non si possono tenere in ufficio decine di calendari, né si possono 
sempre fare complessi calcoli sugli anni a venire; spesso però c’è 
bisogno di sapere come si corrispondono date e giorni della settimana, 
anche in anni lontani... Ecco un calendario perpetuo, perfetto e veloce. 


Memodesk, pag. 14 


Blackjack, pag. 27 


Tutto sulle stampanti, pag. 55 


Azzardo 

Il computer diventa mazziere di Blackjack, in una simulazione che 
ricalca fedelmente il funzionamento delle slot machine di Las Vegas. 


Dentisti 

Due programmi per lo studio dentistico; uno consente un'oculata 
gestione dei clienti e della contabilità, l'altro è un ausilio scientifico. 


99 


Grafica 

Creare intere immagini e figure a blocco sullo schermo Hi-Res, e poi 
animarle. Un’altra nota tecnica sul funzionamento della DHR. 


108 


Appliscuola 

Il famoso numero di Avogadro e il concetto quantitativo di mole: 
la visualizzazione aiuta a spiegarli e ad apprenderli meglio. 


Le rubriche 


6 Applichi 
IOApplicosa 
107 Applipratica 


113 Applihelp 
115 Applettere 
117 Disk Service 
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DIREZIONE GENERALE E AMMINISTRAZIONE 





20122 Milano - Corso Monforte. 39 
Telefono (02) 702429 
Telex 350132 MACORM I 


DIRETTORE RESPONSABILE 
Stefano Benvenuti 

COLLABORATORI 

Adelio Barcella 
Aldo Brambilla 
Giorgio Caironi 
Marco Gussoni 
Mario Magnani 
Francesca Marzotto 
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Domenico Semprini 
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REALIZZAZIONE EDITORIALE 
Editing Studio 

• 

Tutti i diritti di riproduzione e traduzio¬ 
ne di testi, articoli, progetti, illustra¬ 
zioni, disegni, listati di programmi, fo¬ 
tografie ecc., sono riservati a termini 
di legge. I programmi pubblicati su 
Applicando possono essere utilizzati 
per scopi privati, scientifici e dilettan¬ 
tistici, ma ne sono vietati sfruttamenti 
e utilizzazioni commerciali. I mano¬ 
scritti, i disegni, le foto anche se non 
pubblicati, non si restituiscono. 


Servizio abbonamenti: Editronica srl. 
C.so Monforte 39, Milano - Conto Cor¬ 
rente Postale n. 19740208 - Una co¬ 
pia L. 5.000. Arretrati 7.000 lire. Abbo¬ 
namento 10 numeri (senza dono) Li¬ 
re 40.000 (estero L. 60.000). Abbona¬ 
mento 10 numeri, più le Pagine del 
Software per Apple, L. 50.000 (estero 
70.000). Periodico mensile - Stampa: 
Poligrafico Piemontese S.r.l., Casale 
Monferrato (AL) - Distribuzione esclusiva 
per l’Italia A. & G. Marco S.p.A., Via For¬ 
tezza 27, Milano, tei. 02/25.261, telex 
350320 - Fotocomposizione: News, Via 
Nino Bixio 6, Milano - Fotolito: Mediola- 
num Color Separation, Via Marcona 3, 
Milano. © Copyright 1985 by Editronica 
srl - Registrazione Tribunale di Milano 
n. 24 del 15.1.1983 - Pubbl. inf. al 70%. 



UNIONE STAMPA 
PERIODICA ITALIANA 


C ' era una volta solo il Lisa Pascal. Poi arrivò il 
Microsoft Basic. Si era nel gennaio 1984, e per chi 
avesse voluto scrivere allora programmi per il 
Macintosh non esistevano alternative. Un anno e 
mezzo dopo, nell'agosto 1985, i linguaggi per Mac 
erano diventati 24 (Macintosh 68000 Development 
System, Macintosh Pascal, MacFortran, MacForth, 
Mac C Toolkit, Experlogo, Experlisp, C-Tree, Hippo- 
C, CP/M, Neon, Mac-Asm, Aztec C 68 K, Megamax 
C, Rascal, MacCobol, MasterForth, Modula-2, 
PortaAPL, Pascal / Fortran P-System, Softworks C). 
Ma non è tutto: entro il marzo 1986 saranno disponibili 
anche il Macintosh Pascal Compiler, il Macintosh C 
Compiler, il Macintosh 68000 Assembler e i Macintosh 
Utility Programs, tutti e quattro prodotti dalla Apple. 

Per annunciare la lieta novella è sbarcato in Europa 
Kin Seto, Software Evangelist della Apple di 
Cupertino, che in una brumosa Parigi di novembre ha 
intrattenuto sull'argomento, e per un'intera giornata, 
gli uomini chiave delle più eminenti software-house 
europee. Kin, suadente e appassionato quanto ci si può 
aspettare dalla sua qualifica, ha diffusamente parlato 
anche della rete AppleTalk e di come scrivere 
programmi che ne facciano il miglior uso possibile. E 
ha presentato anche la Bibbia per chi volesse 
sviluppare programmi in PostScript, il linguaggio 
interno della LaserWriter, nonché di MacApp, lo 
straordinario prodotto che permette di predisporre 
programmi personalizzati anche ai meno iniziati. 

Anche Applicando era a Parigi a prendere appunti in 
quella brumosa giornata di novembre, e presto 
pubblicherà una guida ragionata ai linguaggi 
disponibili, segnalando vantaggi e svantaggi di 
ciascuno. Per chi vuol scrivere programmi 
professionali. Ma anche per chi vuol soltanto provare a 
far da sé. 




J> 
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Echi 



Mila Vaiani, a destra nella foto, che ha curato con il 
Macintosh l’organizzazione del premio Pubblicità e Successo. 


Quanti spot 
per un Mac! 

Nei magnifici locali mila¬ 
nesi della BRW e Partner, 
una delle maggiori agenzie 
di produzione di spot pub¬ 
blicitari, si è svolta la terza 
edizione dell’Annual Pub¬ 
blicità e Successo 85. Que¬ 
sto Annual, promosso dalla 
New international Media, 
casa editrice di Pubblicità 
Domani e Pubblico, si pro¬ 
pone di presentare i prodotti 
e le aziende per il cui succes¬ 
so la pubblicità è stata giudi¬ 
cata elemento positivo e de¬ 
cisivo. La giuria del concor¬ 
so era composta da 36 giura¬ 
ti scelti nel mondo della 
pubblicità, dello spettacolo 
e della cultura: spiccavano i 
nomi di Oreste del Buono, 
Renzo Arbore, Chiara Be- 
ria e di esponenti di grosse 
società di importanza nazio¬ 
nale. Sono state esaminate 
ben 281 campagne pubblici¬ 
tarie, sia televisive che a 
mezzo stampa, che hanno 
interessato circa 200 case 
produttrici. 

Per poter presentare i ri¬ 
sultati delle votazioni in 
tempo reale Mila Vaiani, 
che ha collaborato all’orga¬ 
nizzazione del premio, ha 
pensato bene di farsi aiutare 
da un Macintosh completo 
di programma Microsoft fi¬ 
le. Ogni giurato aveva a di¬ 
sposizione una scheda stam¬ 
pata da Macintosh nella 
quale venivano indicate le 
varie campagne che doveva¬ 
no ricevere un voto dall’uno 
al sette. Tutti questi voti so¬ 
no stati introdotti, mano a 
mano che arrivavano dalle 
giurie, in modo che Macin¬ 
tosh potesse eseguire i con¬ 
teggi e ottenere un voto fi¬ 
nale per ogni campagna. 

Alla fine le campagne so¬ 
no state riordinate in ordine 
al voto finale, stampate e di¬ 
stribuite ai presenti nel bre¬ 
ve spazio di tempo nel quale 
è stato servito il buffet. Mila 
Vaiani, che ha dichiarato di 
essere stata un po’ scettica 
quando le hanno proposto 
di gestire un lavoro così im¬ 
portante e delicato con un 


Mac, ora è del tutto convin¬ 
ta che l’aiuto dato dal Ma¬ 
cintosh sia stato determi¬ 
nante per il successo della 
magnifica serata. Ma, met¬ 
tendo da parte per un attimo 
le lodi al Macintosh, chi è 
stato il vincitore? La palma 
della vittoria è toccata alla 
B&B Italia, produttrice dei 
famosi divani, seguita da 
Volkswagen e Pastiglie Val- 
da. Al sesto posto indovina¬ 
te chi troviamo? Sì, proprio 
la Apple, classificatasi in 
questa posizione davanti a 
società ben più importanti e 
con budget pubblicitari ben 
più consistenti... 

Ma non è sacro 

Riesce a gestire contem¬ 
poraneamente un computer 
shop e una serie di manife¬ 
stazioni settoriali e non (tra 
le altre, è suo il successo del¬ 
la mostra di oggetti in plasti¬ 
ca degli anni Trenta, Qua¬ 
ranta e Cinquanta denomi¬ 
nata "Follia") amalgamando 
le diverse attività in un no¬ 
me tanto antico quanto fan¬ 
tasmagorico: Il tempio del 
computer. Si chiama Um¬ 
berto Accenti, 41 anni, re¬ 
sponsabile della società a re¬ 
sponsabilità limitata Ede- 
lektron, proprietaria, ap¬ 
punto, del computer shop II 
tempio del Computer. Per¬ 
ché questo nome? 

"Il negozio si trova nel 


centro storico. Occupa una 
superficie di 900 mq che si 
percorre in mezzo a corridoi 
e grossi saloni dove è possi¬ 
bile avere un impatto diretto 
con le macchine. Tra i diver¬ 
si logo proposti abbiamo 
scelto quello che a noi sem¬ 
brava dare più l’idea del luo¬ 
go e nello stesso tempo che 
seguisse in un certo qual mo¬ 
do l’impronta del nome del¬ 
la società." 

Dunque un impatto diret¬ 
to con le macchine. È questa 
la politica del tempio del 
computer? 

"Alla base del progetto c’è 
sempre stata la volontà di 
smitizzare la paura del com¬ 
puter, creare un dialogo di¬ 
retto tra il cliente e il perso¬ 
nal senza l’assillo del solito 
venditore che parla in com¬ 
puterese. Da questa politica 
deriva una scelta ben preci¬ 
sa: non siamo noi che andia¬ 
mo dal cliente potenziale ma 
facciamo in modo che il po¬ 
tenziale cliente venga da 
noi. Un nostro volere che 
abbiamo poi scoperto essere 
anche un’esigenza del clien¬ 
te". 

In questo modo, però, si 
rischia di escludere le grosse 
utenze. È difficile che le me¬ 
die e grandi aziende si rechi¬ 
no presso un computer 
shop. 

"È un rischio che abbiamo 
voluto correre; per fortuna, 
con adeguate iniziative, sia¬ 


mo riusciti a far capire alla 
gente che un negozio che 
vende computer non serve 
solo all’hobbista o al profes¬ 
sionista, ma è in grado di 
proporre soluzioni molto 
più ampie. La prova di quel¬ 
lo che le ho detto è un’anali¬ 
si sui nostri clienti che abbia¬ 
mo condotto prendendo in 
esame il periodo genna¬ 
io-ottobre 1985: le medie e 
grosse aziende rappresenta¬ 
no, insieme, il 42% del no¬ 
stro volume di venduto." 

Adeguate iniziative per 
fare conoscere la vostra po¬ 
litica. Quali sono invece i 
servizi che offrite dopo l’ac¬ 
quisto? 

"L’assistenza hardware e 
software fino all’avviamen- 
to. Poi, a seconda delle pro¬ 
blematiche, indirizziamo i 
clienti presso terzi prece¬ 
dentemente analizzati e di 
constatata affidabilità: un 
punto vendita non può, a 
nostro avviso, soddisfare le 
mille problematiche dei di¬ 
versi mercati. Può però 
crearsi un parco di potenzia¬ 
li società in grado di trovare 
soluzioni ad hoc.” 

Entriamo nel settore Ap¬ 
ple. Le novità presentate al¬ 
lo Smau sono molte, sia per 
la serie // che per il Macin¬ 
tosh. Come ha reagito il 
mercato tenendo conto an¬ 
che di quello che si è detto e 
scritto sulla casa di Cuperti- 
no? 

"Premetto che la mia opi¬ 
nione è sempre stata che alla 
Apple manchi un’identità di 
mercato: si rivolge a un tar¬ 
get anonimo. Ancora oggi 
non so bene a chi devo ven¬ 
dere un sistema Apple. Dai 
dati che abbiamo sono i pro¬ 
fessionisti e i piccoli studi 
che hanno scelto la mela. 
Comunque la crisi si è senti¬ 
ta: a marzo il venduto Apple 
ha superato quello Ibm. Poi 
il grande crollo e, adesso, i 
sintomi del riassestamento. 
Nella fetta dei professional 
computer, il 70% del nostro 
venduto (per intenderci Ap¬ 
ple, Ibm e Olivetti), Apple 
detiene oggi il 34%." 

Il tempio del computer 
compie in questi giorni un 
anno di attività. 
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Anche casa tua 

Lo stand della rivista Ca¬ 
saviva presso la 16a edizione 
di La mia casa, esposizione 
di arredamento e comple¬ 
menti che si è svolta presso 
la Fiera di Milano all’inizio 
di novembre, era veramente 
facile da riconoscere: una fi¬ 
la di alcune decine di perso¬ 
ne vi stazionava quasi in 
continuazione davanti. Il 
motivo di così vasto interes¬ 
se era l’offerta da parte della 
rivista Casaviva a tutti i suoi 
lettori del progetto d’arre¬ 
damento gratuito di un loca¬ 
le, eseguito dagli architetti 
utilizzando un Macintosh. 

Terminata l’esposizione, 
l’iniziativa continua: Appli¬ 
cando ha raggiunto un ac¬ 
cordo con il direttore re¬ 
sponsabile di Casaviva, Ma¬ 
ria Pia Rosignoli, per offrire 
ai propri lettori la stessa op¬ 
portunità. Anzi meglio, in 
quanto il progetto vi verrà 
inviato direttamente a casa, 
naturalmente disegnato da 
Macintosh e stampato con la 
nuova LaserWriter. Per rea¬ 


lizzare questi progetti Casa¬ 
viva si avvale dell’architetto 
Yoram Ortona, coadiuvato 
da valenti collaboratori che 
hanno curato anche tutte le 
realizzazioni durante il pe¬ 
riodo fieristico e sono con¬ 


cordi nell’affermare che l’a¬ 
iuto del Macintosh è stato 
molto importante: probabil¬ 
mente senza di esso non si 
sarebbero potute evadere in 
maniera così ordinata e per¬ 
fetta le centinaia di richieste 


dei lettori di Casaviva. 

Grazie a Mac e a Casavi¬ 
va, dunque; e se siete inte¬ 
ressati a ricevere gratuita¬ 
mente il progetto d’arreda¬ 
mento di un locale, non ave¬ 
te che da: 

• disegnare il perimetro del 
vostro locale su questa carta 
quadrettata, tenendo pre¬ 
sente che ogni quadretto 
equivale a 20 cm 

• indicare la posizione di 
porte e finestre e indicare la 
direzione di apertura 

• indicare i punti luce, le 
prese di corrente e gli inter¬ 
ruttori 

• indicare la posizione e l’in¬ 
gombro dei caloriferi, il tipo 
di pavimentazione e rivesti¬ 
mento delle pareti 

• annotare l’altezza del lo¬ 
cale e descriverne la lumino¬ 
sità (alta, media, bassa) 

• segnalare in modo chiaro 
il vostro nome e indirizzo 

• inviare il tutto ad Appli¬ 
cando, C.so Monforte 39, 
20122 Milano. 

Riceverete la stampa del 
progetto direttamente a ca¬ 
sa vostra entro 60/70 giorni. 



La griglia quadrettata sulla quale dovrete disegnare il perimetro del locale che verrà arredato con il Mac. 















diventa 
Il mio Ufficio! 

Completamente in italiano, 
facilissimo da usare, 
totalmente integrato. 
Per archiviare esattamente 
come avviene con 
i classificatori tradizionali. 
Per predisporre carte 
intestate esattamente come 
avviene nelle tipografie. 
Per stampare lettere 
personalizzate senza fatica. 



Per impostare fatture in cui 



vendute e i prezzi unitari 
per ottenere i relativi totali. 
Per stampare e mettere 
nell'ordine desiderato 
le etichette degli indirizzi... 



































































THE OFFICE SYSTEM FOR THE MACINTOSH * 

in italiano 


Un programma per il tuo macintosh 
da provare subito. 

Compralo! Oppure ordina il Demo. 
Siamo sicuri che ti convincerà. 




Puoi trovare My Office da: 

Piemonte 

ABcomputer Corso Grosseto 209 Torino 
Tekno Computers Via Madama Cristina 31/C Torino 
DR Viale XX Settembre 19 Novara 


Lombardia 

All'Informatica Via Lazzaretto 2 Milano 
Via Vigevano 8 Milano 
Small Business Computers 
Via Settembrini ang. Via Vitruvio 38 MI 
Deco Viale dei Plantani 4 Arese MI 
Personal Computer Shop 
Via L. da Vinci 36 Trezzano s/n MI 
I.R.P.E. Via dei Carantani 1 Varese 


Liguria 

Emac Via L. Devoto 25 Genova 


Tre Venezie 

P.S.EIettronica Via Tavagnacco 89 Udine 

Emilia Romagna 
E.D.P. Sistemi Viale Pietramellara 61/F Bologna 


Toscana 

Computerà Shop Via Papa Giovanni XXIII 47/49 Grosseto 



Copertine) I 


Porla della Stampante: 




Lunghezza 


l aspi 


Qualità: 

“ipstol 


Comandi della copiatrice 


Grafici speciali [| 


* File Composizione Moduli Grafici Caratteri Stile Stompo 


Zoroostri Rmilcare 


i - 

I ©TOM ©“©KàUMti 


I □ Sì, desidero acquistare My Office. Scelgo la seguente formula di 
| pagamento: 

□ Accludo assegno non trasferibile di lire 295mila (Iva e spese 
di spedizione comprese) intestato a Editronica srl. 

□ Accludo ricevuta di versamento su conto corrente postale n. 
19740208 intestato a Editronica srl, di lire 295mila (Iva e 
spese di spedizione comprese). 


I □ Sì, desidero provare My Office. Speditemi il dischetto Demo al 
prezzo di lire 25mila (Iva e spese di spedizione comprese). Resta 
inteso che se acquisterò poi il programma tale importo mi verrà 
I scontato sul prezzo d’acquisto, e potrò quindi ricevere My Office al 
I prezzo di lire 270mila anziché 295mila. Scelgo la seguente formula 
di pagamento: 

□ Accludo assegno non trasferibile di lire 25mila (Iva e spese 
di spedizione comprese) intestato a Editronica srl. 

□ Accludo ricevuta di versamento su conto corrente postale n. 
19740208 intestato a Editronica srl, di lire 25mila (Iva e 
spese di spedizione comprese). 





Sisteda Via Velino 5 Torrette Ancona 


Lazio 

Computer Center via Prati Fiscali 257 Roma 

Calabria 

GLM Informatica Via De Nava 98 Reggio Calabria 

Sicilia 

StHL Piazza Galatea 2 Catania 

oppure presso I migliori rivenditori 



Nome e Cognome 


Indirizzo.Cap 

Città.Prov 


Ritagliare e spedire in busta chiusa a: Editronica srl, 
Corso Monforte 39, 20122 Milano. 
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Icosa 


Finanziare 
la mela 

L’acquisto di un compu¬ 
ter può alcune volte creare 
dei problemi di bilancio e in 
ogni caso, affinché risulti un 
buon investimento fin dall’i¬ 
nizio, è opportuno scegliere 
il finanziamento più conve¬ 
niente. Recentemente la 
Banca Popolare dell’Emilia 
ha proposto una nuova linea 
di prestiti destinati ad age¬ 
volare l’acquisto di personal 
computer da parte di piccole 
imprese, professionisti e pri¬ 
vati. Questo nuovo servizio, 
che prevede finanziamenti 
di 20 milioni di lire massimo 
e fino a 36 rate mensili, si 
chiama "Melatronica" e si 
pone l’obiettivo di realizza¬ 
re un nuovo tipo di prestito 
che possa essere utilizzato 
vantaggiosamente da una 
clientela estremamente di¬ 
versa. 

Con Melatronica infatti si 
è tenuto conto del fatto che 
nessuna delle varie forme fi¬ 
no a ora utilizzabili risulta 
conveniente per le diverse 
categorie di utenti e si è vo¬ 
luto studiare un nuovo mo¬ 
do di finanziare l’acquisto 
del personal. 

Con questa iniziativa in¬ 
novativa il cliente può sce¬ 
gliere le forme di finanzia- 


Abbiamo elaborato 
la melatronica, 



il personal computer 
a costo calcolato. 


Non un leasing e non un 
prestito impersonale: 
Melatronica è un’operazione 
espressamente diretta a 
finanziare l'acquisto di 
computer. 


mento che minimizzano il 
costo implicito di rimborso, 
tenendo conto, per esem¬ 
pio, dei recuperi fiscali: pre¬ 
stito personale, prestito 
aziendale, mutuo agevola¬ 
to, leasing, eccetera. Un 
esempio di Melatronica, da 
confrontarsi a parità di pre¬ 
supposti con altre possibili 
forme di finanziamento, 
può essere il caso di un uten¬ 
te che richiede sotto forma 
di prestito personale 
6.300.000 lire da rimborsarsi 
in 36 rate mensili per l’ac¬ 
quisto di un Macintosh: ogni 
rata sarà di 218.300 lire. 

Plotter 

La Graphtec Corp. di To¬ 
kio, rappresentata in Italia 
da SPH computer, amplia la 
propria gamma di plotter a 
basso cosso con il nuovo mo¬ 
dello a foglio mobile di gran¬ 
de formato, GP9001. L’area 
di scrittura massima è 1139 
per 801 cm, cioè le dimen¬ 
sioni di un foglio A0. Dispo¬ 
ne di quattro tipi di diverse 
penne, con velocità di plot- 
taggio massima di 25 cm al 
secondo. La risoluzione è di 
0.05/0.1 mm, selezionabile 
tramite hardswitch, con una 
precisione inferiore a +/— 
0.3% della distanza di lavo¬ 
ro. Può essere utilizzata sia 
carta speciale da disegno 
che carta in poliestere per 
disegno ad alta qualità con 
penne ceramiche. 

Sono disponibili ben 10 
set diversi di caratteri, sele¬ 
zionabili con il comando 
font e 2 set di comandi: il 
linguaggio grafico Graphtec 
tipo personal plotter (stan¬ 
dard) e il linguaggio grafico 
HP (opzionale). Il Plotter 
GP9001 è interfacciabile 
con una porta parallela a 8 
bit Centronics (standard), 
con un buffer di lOObyte, 
con una porta seriale 
RS232-C o IEEE — 488 
(opzionali) con un buffer di 
L6 Kbyte. Il plotter GP9001 
è già in vendita nei migliori 
computer shop e costa, nella 
versione standard, cioè con 
porta a 8 bit parallela, 
17.473.000 lire più Iva. 



Supporto 
per Mac 

Si tratta di un supporto 
orientabile antisdrucciolo 
per Macintosh che a dispet¬ 
to della sua semplicità e so¬ 
brietà fornisce innumerevoli 
vantaggi. Infatti con la pos¬ 
sibilità di orientare di 360 
gradi lo schermo di Mac 
vengono risolti tutti i pro¬ 
blemi di riflessi causati dal¬ 
l’ambiente di lavoro, contri¬ 
buendo a diminuire lo stress 
dell’operatore. Inoltre Swi- 
vel consente di ottimizzare 
lo spazio sulla scrivania, poi¬ 
ché, senza aumentare le di¬ 
mensioni di Mac, permette 
di sfruttare al massimo di¬ 
verse soluzioni logistiche. Il 
supporto è praticamente in¬ 
visibile, quindi anche il lato 
estetico è stato salvaguarda¬ 
to. Il supporto Swivel è di¬ 
stribuito dalla Bits & Bytes a 
113.000 lire più Iva. Per 
maggiori informazioni rivol¬ 
gersi a Bits & Bytes, Via San 
Francesco d’Assisi 8, Mila¬ 
no, Tel. (02) 8376207. 


Hard disk 

La potenza del software, 
almeno in certe applicazioni 
come l’archiviazione dati, è 
strettamente legata sia alla 
quantità di memoria dispo¬ 
nibile nel sistema sia alla ve¬ 
locità con cui è possibile ac¬ 
cedervi. Chiaramente si sta 
parlando di memoria perife¬ 
rica di massa, poiché le ri¬ 
sorse di RAM sono general¬ 
mente molto limitate. Un al¬ 
tro fattore molto importante 
è il costo della memoria, 
poiché se questa diviene 
troppo cara risulta conve¬ 


niente risolvere il problema 
con altri sistemi. 

È disponibile sul mercato 
un nuovo Cabinet a disco 
fisso per i più diffusi perso¬ 
nal tra cui l’Apple e i compa¬ 
tibili . Con Cabinet è possibi¬ 
le disporre di quantità di 
memoria rilevanti a costi re¬ 
lativamente bassi. Il Cabi¬ 
net, realizzato assemblando 
in una struttura progettata 
appositamente gli hard disk 
della Basf alle schede con¬ 
troller della Xebec, ha una 
capacità totale formattata 
che va da 5 a 22 megabyte e 
supporta diversi sistemi 
operativi (DOS 3.3, PA¬ 
SCAL e CP/M 2.2) con una 
velocità di trasferimento da¬ 
ti di 5 Megabis al secondo. Il 
costo dei modelli di Cabinet 
va da 2.400.000 lire per 
quello da 5 Mega a 
3.300.000 per quello da 22. 
Per ulteriori informazioni ri¬ 
volgersi a Data Base, V.le 
Legioni Romane 5, 20147 
Milano, Tel. (02) 40303. 

Megadisk 
e Prodos 

Già da diverso tempo so¬ 
no in circolazione i sistemi 
Megadisk da 8 e 5 pollici, 
distribuiti prima dalla Iret e 
successivamente dalla stessa 
Apple. Di sistemi a 8 pollici, 
che consentono di disporre 
di 1.2 Megabyte per disco, 
sono state vendute circa 700 
mila unità: quindi questo 
particolare software prodot¬ 
to dalla Digitalsync è di no¬ 
tevole importanza. Sosti¬ 
tuendo il controller è infatti 
possibile lavorare con Pro¬ 
dos e quindi con Apple- 
Works, anche con il mega¬ 
disk da 8 pollici. 

Il prezzo del software che 
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consente di utilizzare Pro- 
dos è di 300.000 più IVA. La 
Digitalsync intanto ha an¬ 
nunciato che saranno presto 
sviluppati un nuovo pro¬ 
gramma per consentire il 
back-up da disco rigido a 
megadisk da 8 pollici e una 
scheda da 80 colonne che la¬ 
scia liberi 101K di memoria 
per AppleWorks. Per mag¬ 
giori informazioni rivolgersi 
a Digitalsync, C.so Monca- 
lieri 303,10133 Torino, Tel. 
(011) 633843. 



Proteggiamolo 

Quando il computer è 
nuovo viene trattato con 
ogni attenzione, viene puli¬ 
to, spolverato, quasi cocco¬ 
lato, guai a spostarlo o man¬ 
giare mentre lo si adopera! 
Poi, quando non è più l’ulti¬ 
mo arrivato, ma è diventato 
lo strumento di lavoro di tut¬ 
ti i giorni, il computer viene 
esposto a tutte le insidie del 
tempo e della distrazione. 



Trasportare il computer o 
semplicemente usarlo con 
troppa disinvoltura può co¬ 
stare veramente caro se non 
si prendono le dovute pre¬ 
cauzioni. 

La Cover ha studiato una 
serie di accessori volti sia a 
difendere il computer dalle 
aggressioni accidentali e 
dall’incuria, sia a migliorare 
il comfort dell’utente. Per 
proteggere la tastiera da col¬ 
pi accidentali, polvere, umi- 



Tre prodotti Cover per la protezione dei computer Apple: le 
borse imbottite per il trasporto del Mac e del //c e il Mobil 
compact, per una razionale collocazione del Macintosh. 



dità e acidi, la Cover propo¬ 
ne una copertura rigida in 
ABS da 2.5 mm con caratte¬ 
ristiche antistatiche, anti¬ 
corrosione e antiurto, tra¬ 
sparente fumé. Per il tra¬ 
sporto del computer vengo¬ 
no presentate borse cofanet¬ 
to di assoluta protezione, 
completamente imbottite su 
tutta la superficie con gom¬ 
ma espansa antiurto da 10 
mm all’interno dei due tes¬ 
suti. Il tessuto esterno è la¬ 
vabile e antistrappo, quello 
interno in vellutino lavabile, 
le tasche esterne, per il tra¬ 
sporto di tutti gli accessori, 
sono a soffietto con pattine 
per la chiusura adesiva a 
strappo, la tracolla, regola¬ 
bile, è in nylon nero da 3 cm, 
con spalliera antiscivolo. 

Il modello per Apple Ile, 
che può contenere la tastie¬ 
ra, il visore a quarzi e il drive 
esterno, costa 59.000 lire, 
mentre quello per Macin¬ 
tosh, che trasporta la tastie¬ 
ra, il monitor, e il drive, vie¬ 
ne 89.000 lire. 

Per quanto riguarda il 
comfort, la novità è il Mobil 
Compact per Mac. Si tratta 
di un mobiletto in plexiglass 
antiacido da 5 mm di colore 
trasparente fumé, realizzato 
per assemblare nello spazio 
di 52 x 35 x 41 cm tutto il 
Macintosh e i suoi accessori. 
Il piano della stampante è 
inclinabile, i piedini sono 
antivibrazione, il suo design 
è sobrio e piacevole. Mac 
Mobil Compact costa 
235.000 lire. 

Altri accessori di grande 
interesse sono gli stand por¬ 
ta stampante in metacrilato, 
in colore trasparente fumé 


nello stesso stile delle copri- 
tastiera e del mobile per 
Mac, corredati da piedini 
d'appoggio di gomma anti¬ 
vibrazione. Utilissima è an¬ 
che la coppa fonoassorbente 
per terminali stampanti in 
ABS goffrato di colore bei¬ 
ge. La struttura, composta 
da quattro pezzi, è comple¬ 
tamente insonorizzata e pre¬ 
vede rinserimento di una 
ventola per il raffreddamen¬ 
to. Completano la serie i 
raccoglitori di dischetti, la 
carta per le stampanti, i 
floppy e i prodotti per la pu¬ 
lizia del monitor e dei drive. 
Per maggiori informazioni 
rivolgersi a Cover, Via Ei¬ 
naudi 22, 36040 Brendola 
(Vicenza), Telefono (0444) 
798354. 

Manutenzione 

Una cattiva manutenzio¬ 
ne dei dispositivi di memo¬ 
ria di massa può vanificare 
ore e ore di lavoro, può 
comportare la perdita di dati 
e di programmi preziosi, in¬ 
somma può costare molto 
caro. È molto più ragione¬ 
vole ed economico procede¬ 
re a operazioni di controllo e 
messa a punto periodiche, 
l’importante però è utilizza¬ 
re strumenti idonei, proget¬ 
tati esattamente allo scopo, 
per non incorrere in spiace¬ 
voli inconvenienti. 

La Mapes, che produce 
una vasta gamma di accesso¬ 
ri per computer, propone 
due prodotti utili e interes¬ 
santi: una soluzione per la 
pulizia della testina del disk 
drive che rimuove delicata¬ 
mente gli agenti contami- 



Sono 25 i dischi da SW' che 
possono trovare protezione 
in questo raccoglitore della 
Mapes. 
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Teo Rusconi ha appena 
sfatato la leggenda 
secondo la quale i floppy disc 
sono tutti uguali 


Difatti sembrano tutti uguali finche non 
si osserva con attenzione il jacket. Qui 
termina l’uguaglianza. 

La maggior parte delle società costruttrici 
sigillano i dischi un punto qui, un punto là, 
lasciando parte dei lembi non sigillati. 

Prima o poi ai lembi accadono cose 
naturalissime: si gonfiano, si curvano, si 
raggrinziscono... in poche parole si aprono. 


GLI ALTRI DISCHETTI 

chiusi un punto qui, 
un punto là lasciano 
gran parte dei 
lembi aperti. 


Con penne, matite, unghie persino un 
ragazzino di quattro anni come Teo può 
infilarsi in quegli spazi aperti. 

Naturalmente è un danno enorme perchè 
se si inserisce qualcosa di molle e slabbrato 
nel disc-drive quest’ultimo può incepparsi; 
si può rovinare la testina e si possono 
perdere i dati. Questo può accadere con gli 
abituali sistemi di chiusura ma non con i 
dischetti Memorex che usa un 
procedimento esclusivo chiamato 
“Solid-Seam Bonding”. 

Con questo sistema ogni singolo 
millimetro quadrato dei lembi di tutti i 
dischi Memorex viene sigillato 
ermeticamente, rendendoli più rigidi e più 
resistenti. 


È un sistema che consente al floppy disc 
di sostenere ogni assalto, che impedisce alla 
testina di rovinarsi e ai dati di andare perduti. 

Il che sta a dimostrare che un floppy disc 
Memorex non è uguale a tutti gli altri: è 
migliore. E il sistema di saldatura è solo un 
esempio della cura infinita con cui viene 
prodotto ogni floppy disc Memorex; sia 
esso da 8”, da 5 1/4” o il nuovo 3 1/2”. 
Questa estrema accuratezza dà la garanzia 
che ogni disco Memorex è al 100% perfetto. 

La prossima volta che acquistate un 
floppy disc - o qualche centinaio 
- ricordate: non tutti i dischetti 
sono uguali... 

Memorex vi mette al 
riparo da qualsiasi 
inconveniente. 


r?r 
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nanti, ripristinando le con¬ 
dizioni originali, e un como¬ 
do ed ergonomico raccogli¬ 
tore di dischi da 5 pollici e 
1/4, della capacità di 25 uni¬ 
tà. L’uso di questi accessori, 
e l’osservazione dei più ele¬ 
mentari accorgimenti per la 
manipolazione dei floppy, 
consentiranno una lunga vi¬ 
ta al vostro software. Per 
maggiori informazioni rivol¬ 
gersi a Mapes, Via Ponchiel- 
li 3, 24100 


pulire le testine 
del disk drive la Mapes 
propone questo 
dischetto da 5'A". 


Il GPIS 
per industria 

Il computer può comuni¬ 
care con il mondo esterno, 
quindi può essere utilizzato 
con successo per dialogare e 
se necessario per impartire 
ordini a macchine più "stu¬ 
pide". A questo scopo la 3D 
Digital Design and Deve- 
lopment ha realizzato que¬ 
sta nuova interfaccia, orien¬ 
tata specificatamente alla 
gestione dei processi indu¬ 
striali. 

Le caratteristiche dell’in¬ 
terfaccia GPIS, oltre all’e¬ 
conomicità (costa solo 
325.000 lire più IVA), sono 
quelle di consentire una 
equilibrata combinazione di 
input e output analogici con 
una risoluzione a 12 bit. 
Inoltre GPIS dispone di una 
porta a otto bit per gli input 
digitali e una porta di uscita 
a otto bit provvista di uno 
stadio di potenza in Darling- 


ton a collettore aperto, ca¬ 
pace di un’uscita fino a un 
massimo di 400 mA e 50 
volt, capace ad esempio di 
pilotare un relais di massimo 
20 watt di potenza. 

L’interfaccia è in grado di 
convertire segnali da analo¬ 
gico a digitale e viceversa 
dialogando con il mondo 
esterno attraverso 8 canali 
indipendenti. Questo con¬ 
sente di comandare 8 pro¬ 
cessi su macchine diverse 
oppure di coordinare più at¬ 
tività integrate, sincroniz¬ 
zandole via software. Per 
maggiori informazioni rivol¬ 
gersi a Pertel, Via Ormea 99 
Torino, Tel. (011) 655865. 

Computer 

Graphics 

Chi ha provato a realizza¬ 
re dei lavori di grafica un po’ 
sofisticati, si è subito reso 
conto di quali sono le mag¬ 
giori difficoltà. Per prima 
cosa normalmente mancano 
adeguati strumenti di input, 
cioè quelle periferiche che 
consentono di portare den¬ 
tro al calcolatore le immagi¬ 
ni realizzate sulla carta, se¬ 
condariamente manca la co¬ 
noscenza delle tecniche più 
avanzate di progettazione. 

A questo proposito la Ei¬ 
dos organizza, a partire dal 
13 Gennaio 1986, il corso di 
specializzazione di Atelier 
Eidomatico (computer 
Graphics). Lo scopo del cor¬ 
so è di consentire a tutti co¬ 
loro che hanno un interesse 
professionale nell’applica¬ 


zione della computer Grap¬ 
hics, designer, architetti, 
grafici, registi eccetera, di 
impadronirsi delle cono¬ 
scenze tecniche e creative 
per utilizzare il computer 
per produrre immagini ani¬ 
mate o statiche. 

Verranno messe a dispo¬ 
sizione dei corsisti tutte le 
attrezzature più sofisticate 
necessarie alla progettazio¬ 
ne e l’intero archivio della 
Eidos, costituito da una bi¬ 
blioteca, una nastroteca e 
una videoteca. Il corso di 
specializzazione, che si pre¬ 
figura come il naturale com¬ 
plemento del corso teorico 
di base iniziato il 2 Dicem¬ 
bre 1985, ha un costo di 
1.500.000 di lire e una dura¬ 
ta di tre settimane. Le lezio¬ 
ni sono previste il lunedì, 
martedì e giovedì dalle 
18.30 alle 21.30 presso il 
Centro di Formazione Eido¬ 
matico della Eidos. Per 
maggiori informazioni rivol¬ 
gersi a: Eidos, Via Fontana 
16, 20122 Milano, Tel. (02) 
5458621. 

Guida pratica 
al Prodos 

Questo libro di poco più 
di 90 pagine vuole essere 
una facile e pratica guida al 
sistema operativo Prodos di- 
retta principalmente agli 
utenti che non hanno né vo¬ 
glia né tempo di affrontare 
la lettura di lunghi e impe¬ 
gnativi manuali in lingua in¬ 
glese. In modo conciso, ma 
senza trascurare nessun ar¬ 
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gomento, il lettore viene 
guidato attraverso numero¬ 
se videate esplicative, verso 
le più diverse utilizzazioni 
del Prodos: gestione della 
memoria, dei dischi, delle 
directory e dei file. 

Nel libro vengo affrontati 
e descritti tutti i comandi 
che costituiscono i menù del 
Prodos e vengono inoltre 
forniti gli strumenti conosci¬ 
tivi per sfruttare le potenzia¬ 
lità del sistema da Apple¬ 
soft, per chi oltre a utilizzare 
pacchetti applicativi si inte¬ 
ressa di programmazione in 
Basic. Superato il primo ap¬ 
proccio con il sistema, già 
dal secondo capitolo vengo¬ 
no presentate le tecniche 
per la manipolazione dei di¬ 
schi: copia, modifica e con¬ 
fronto di volumi, creazioni 
di dischi autoawianti (boot- 
strap), rilevazioni di blocchi 
difettosi, eccetera. 

Una particolare attenzio¬ 
ne è stata dedicata a un 
aspetto innovativo del Pro¬ 
dos rispetto al Dos 3.3: la 
struttura ad albero. Tutto il 
terzo capitolo affronta infat¬ 
ti questa caratteristica del si¬ 
stema; vengono presentati e 
descritti oggetti come: Patti¬ 
narne, prefix, subdirectory, 
pattern matching eccetera. 
Conversioni da Dos a Pro¬ 
dos e utilizzo dell’Applesoft 
sotto Prodos sono gli argo¬ 
menti degli ultimi due capi¬ 
toli che vengono supportati 
da numerosi esempi di pro¬ 
grammazione. In conclusio¬ 
ne un libro veloce, ma non 
superficiale, che affronta un 
argomento piuttosto vasto 
sprecando poche parole, ma 
con l’aiuto di esempi sempre 
efficaci. 


Francis Verscheure, Prodos 
per Apple Ile e Apple Ile, EP- 
S1 editore, 96 pagine, 12.000 
lire. 
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<# Se avete mille impegni, ricordarvi date e scadenze può 
diventare un problema. Potete però tener nota degli 
avvenimenti importanti della vostra vita, e soprattutto di quella 
altrui, con questo programma in Applesoft, facile da usare. Non 
è la solita agenda elettronica, ma un vero calendario intelligente 
da scrivania. Si possono introdurre, modificare o eliminare 
avvenimenti, e poi richiamare un evento visualizzando un 
calendario con le date e un elenco degli avvenimenti. È abilitata 
anche la stampa, per mese o addirittura per anno. 


DOS 3.3 
ProDOS 
APPLE //e 


APPLE //c 


Se l’anniversario 
è indimenticabile 


C hi si rimprovera perché ha di¬ 
menticato una ricorrenza impor¬ 
tante si consoli: è in buona compagnia. 
I piccoli lapsus di memoria di questo 
genere sono molto comuni, e gli aned¬ 
doti per sorriderci sopra sono innume¬ 
revoli.. . Non tutti sono però sornioni e 
spiritosi; qualche zia di cui avete scor¬ 
dato il compleanno, per esempio, può 
stizzirsi al punto da non voler perdo¬ 
nare. E la collera di una vecchia zia sa 
il cielo quanto è pericolosa... 

Con l'aiuto di questo Memodesk 
potrete evitare per sempre, a meno 
che non siate predestinati, l’imbarazzo 
di simili dimenticanze. Basta premere 
qualche tasto per passare in rassegna 
l’anno intero, o per esaminare un me¬ 
se alla volta. Si può persino stampare 
su carta, a mo’ di nodo al fazzoletto, 
un calendario con un elenco delle ri¬ 
correnze di ciascun mese. Basterà fis¬ 
sarlo con il nastro adesivo al monitor 
del computer, e non capiterà mai più 
(quasi mai, diciamo) di saltare una da¬ 
ta importante. 

Si tratta comunque, sia ben chiaro, 
di un calendario di avvenimenti, non 
di un’agenda. Memodesk è destinato a 
chi sa che cosa deve fare, ma ha biso¬ 
gno di aiuto per ricordarsi quando è il 
momento di farlo. Che ognuno abbia 
un compleanno lo sappiamo, abbiamo 
solo bisogno di aiuto per ricordare 
quando. 

Il programma dispone, per facilità 
di operazione, della selezione su menù 
a cursore in campo inverso. Grazie a 
routine che consentono di modificare 


e cancellare rapidamente e facilmen¬ 
te, facendo scorrere in fretta gli avve¬ 
nimenti, la modifica del calendario è 
questione di un attimo. È cosa presto 
fatta aggiungere qualcosa a questo o 
quel mese, con la visualizzazione sullo 
schermo delle date già introdotte. 
Un'opzione di stampa permette di vi¬ 
sualizzare il calendario con le relative 
ricorrenze, per anno o per mese. E si 
può stampare il solo calendario per 
qualsiasi mese. 

L’introduzione dei dati dell’avveni- 
mento permette l’immissione di qual¬ 
siasi carattere, e quindi si possono in¬ 
trodurre liberamente virgole, due 
punti e simili. La visualizzazione del 
testo e i messaggi stampati sono for¬ 
mattati in modo che non ci siano paro¬ 
le spezzate alla fine delle righe. 

Come si usa 

Quando si da il RUN al programma 
in Basic dal dischetto esso legge tutti i 
dati dei menù e visualizza il menù prin¬ 
cipale (figura 1). Basta premere le 
frecce per spostare il cursore lungo le 
opzioni del menù, e premere <RE- 
TURN> per confermare la propria 
scelta. 

Da principio sarà probabilmente il 
caso di scegliere l’opzione Creare Me¬ 
se, per quanto lo si possa fare anche 
tramite l’opzione Aggiungere/Cam¬ 
biare/Cancellare. L’introduzione è pe¬ 
rò più veloce utilizzando il modo 
"crea" per introdurre molti avveni¬ 
menti per mese in una volta sola. 


Le opzioni 

• Creare Mese. Dopo aver scelto que¬ 
sta opzione si deve scegliere il mese 
nel quale si vogliono introdurre gli av¬ 
venimenti. Lo si fa premendo le frecce 
per scorrere lungo i dodici mesi. Come 
in tutti gli altri menù del programma il 
tasto <ESC> fa tornare al livello im¬ 
mediatamente superiore di menù, il 
tasto <RETURN> conferma l’opzio¬ 
ne evidenziata e le frecce fanno passa¬ 
re dall’ultima scelta sul menù alla pri¬ 
ma e viceversa. Nel caso specifico si 
può passare da gennaio a dicembre 
spostandosi in su due volte anziché in 
giù undici volte. Nel //e e nel Ile le 
frecce in su e in giù funzionano come le 
frecce sinistra e destra. 

Quando avete scelto i mesi che vi 
interessano un messaggio avverte che 
la creazione di un mese del calendario 
distruggerà tutti gli altri avvenimenti e 
le altre date che eventualmente esista¬ 
no già. Procedete con cautela. Se vole¬ 
te soltanto aggiungere altri avveni¬ 
menti a quelli già esistenti basta che 
usciate da questa routine con <ESC> 
e scegliate Aggiungere sull’opzione 
Aggiungere/Cambiare/Cancellare. Se 
volete creare un mese premete il tasto 
<RETURN>. 

Adesso dovete introdurre la data 
degli avvenimenti. I valori limite sono 
indicati fra parentesi sulla riga di im¬ 
missione. Tutte le introduzioni errate 
sono respinte e si viene riportati alla 
riga di immissione. Si può introdurre 
uno zero per rivedere qualsiasi data 
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precedentemente introdotta. Se si è 
alla prima introduzione viene visualiz¬ 
zato il messaggio NESSUNA INTRO¬ 
DUZIONE. Altrimenti vengono vi¬ 
sualizzati sopra la riga di immissione i 
numeri delle date. 

Ora che si è fatta l’introduzione 
esatta della data per il mese visualizza¬ 
to si è invitati a introdurre l’avveni¬ 
mento. Premete F(oppure f) perfinire 
e tornare al menù principale, o preme¬ 
te zero (0) per visualizzare le date in¬ 
trodotte in precedenza (se ce ne sono). 
L’input di questi dati può arrivare a 
159 caratteri (circa quattro righe), una 
lunghezza che dovrebbe essere suffi¬ 
ciente per la maggior parte degli avve¬ 
nimenti. Si può immettere qualsiasi 
carattere si voglia, compresi la virgola, 
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********** MENU PRINCIPALE ********** 

VISUALI ZZARE CALENDARIO 
CREARE MESE 

AGGI UNGERE/CAMBIARE/CANCELLARE 
VISUALI ZZARE/CAMBIARE ANNO 
FINE 

<-> SCEGLIE . RETURN CONFERMA 


Figuratila 
schermata con il 
menù principale. 
Quando si usa il 
programma per 
la prima volta, è 
meglio utilizzare 
il modo “crea”. 



DICEMBRE - 1985 


1 

! 2 

X! 

! 3 

i 

! 4 

i 

i 

i 

5 

! 6 ! 7 

X! ! 

8 

! ? 
i 

! 10 
i 

! 1 1 

1 

i 

i 

12 

113 ! 14 

X! ! 

15 

! té 
X! 

! 17 

! 18 

i 

19 

120 ! 21 






! X ! 

22 

' 23 

i 

! 24 

i 

! 25 

i 

i 

X! 

26 

127 128 

X! ! X 

29 

! 30 

! 31 

i 

i 


1 1 


Figura 2: la stampata della 
situazione relativa al mese 
di dicembre. Le croci 
(lampeggianti sullo 
schermo) evidenziano i 
giorni da ricordare. 


























LISTATO 


1 REM il»***»*****»#**»*****» 

3 REM * DI MARK CRAVEN » 
il REM « COPYRIGHT (0 1985 * 

5 REM * BY APPLICANDO 4 * 

4 REM * MICROSPARC, INC * 

7 REM ********************** 

10 LET IN» = "X 1 : REM INPUT VARIABILE 
20 Y = 1985:YR$ = STRI (Y) 

30 DJ = CHRJ (4) 

40 TEXT ; GOSUB 180 

50 DIM M$(13) ,D(40) : REM MESI E DATE AVVENIMENTI 
40 DIM 1N$(40) ,EV$(40) : REM INPUT E AVVENIMENTI 
70 DIM N(12),FM(12): REM GIORNI IN CIASCUN MESE, PRIMO DI 
CIASCUN MESE (0-4) 

80 FOR 1 = 1 TO 5: READ MIW1.I): NEXT 

90 FOR I = 1 TO 13: READ M$(I>: NEXT 

100 FOR J = 748 TO 790: READ I: POKE J,I: NEXT J 

110 FOR I = 1 TO 12: READ NEI): NEXT 

120 FOR I = 1 TO 3: READ MU$(2,I>: NEXT : REM DISPLAY MENU 

130 FOR I = 1 TO 3: READ MU*(3,I>: NEXT : REM DISPLAY MENU 

' STAMPA 

140 FOR I = I TO 3: READ MU$(4,I): NEXT : REM MENU' AGGI UN 
CERE.'CAMBIARE/CANCELLARE 

150 FOR I = 1 TO 2: READ MU$<5,!>: NEXT : REM SI'/NO 
140 GOSUB 4310 

170 GOTO 3700: REM INTESTAZIONE 

180 FOR Z = 38 TO 0 STEP - 1: POKE 32,Z: POKE 33,40 - Z: H 
ONE : NEXT : RETURN 

190 POKE 32,0: FOR Z = 0 TO 39: POKE 33,Z * 1: HOME : NEXT 
: RETURN 

200 C = 1 : GOTO 240 

210 VTAB VX * 2 * OS: HTAB H: PRINT MU$(M1.0S) 

220 VTAB VX + 2 » CS: INVERSE : HTAB H: PRINT MIMMI,CS): N 
ORMAL 
230 RETURN 

240 CS = C:I = 0: IWERSE 

250 IF MI = 2 THEN VTAB 8: HTAB 1: PRINT 'VISUALIZZAZIONE. 

■ 

240 FÒR M2 = 1 TO S: IF M2 = CS THEN : INVERSE 
270 VTAB VS7. * M2 * V7. 

280 HTAB H: PRINT MU*(M1,M2>: NORMAL 
290 NEXT 

300 VTAB 23: IMMERSE : PRINT NORfttL : PRINT ' IN 

VERSE : PRINT NORMAL : PRINT ' SCEGLIE . * 

j: IMMERSE : PRINT 'RETURN' ; : NORMAL : PRINT ' CONFERMA 


310 

320 

330 

340 


350 

340 

370 

380 

390 

400 

410 

420 

430 

440 

450 

440 

470 

480 

490 

500 

510 

520 


IF MI < >1 THEN VTAB 24: HTAB 10: PRINT '<■:: 11MERS 
E : PRINT 'ESC';: NORMAL : PRINT ■> MENU PRINCIPALE': 
POKE - 14348,0 

K = PEEK < - 14384): IF K < 128 THEN 330 
POKE - 14348,0:K = K - 128: IF K < > 8 AND K < >21 

AND K < } 10 AND K < > 11 AND K < > 13 AND K < ) 27 

OR (K = 27 AND MI = 1) THEN 330 
OS = CS: IF K = 27 THEN CS = S:OS = S 

IF K = 11 OR K = 8 THEN CS = CS - l:CS = CS * (CS > 0) 

+ S * CCS = 0): GOSUB 210: GOTO 330 
IF K = 21 OR K = 10 THEN CS = CS U:CS = CS » (CS < = 
S) + (CS = S + 1): GOSUB 210: GOTO 330 
C = CS: REM CONSERVA VALORE DI CS 
POKE 894.MI: POKE 895.CS: POKE 894,0: REM SALVA L'ULTI 
MA SCELTA DEL MENU' PER IL RECUPERO DA ERRORI 
ON MI GOTO 410,420,440,450,740,770,780,790,800 
NC = 40:MC = 40: ON CS GOTO 1440,2170,2470,4230,3490: R 
EM SCELTE MENU' PRINCIPALE—Ml=l 
ON CS GOTO 1730,1740.430: REM Ml=2 VISUALIZZA MENU' 
TEXT : GOSUB 190 : GOTO 3700 

ON CS GOTO 1770,1780,3700: REM VISUALIZZA OPZIONI-COLO 
MUE 

ON CS GOTO 2490,2490,3700: REM Ml=4 CAMBIA 
S = 13: FOR I = 1 TO 13: VTAB VX M - 1: HTAB H: PRINT 
M*<1): NEXT 

IF MI > 4 THEN VTAB VX: HTAB H: PRINT MU*(5,1):: HTAB 
H i 5: PRINT MU$(5,2> 

GOTO 540 

IF MI = 5 OR MI = 4 THEN HTAB H ♦ 5 * OS - 5: VTAB VX: 
PRINT MU$(5,0S): GOTO 510 

HTAB H: VTAB VX ♦ OS - 1: CALL - 848: PRINT MJ(OS) 

IF MI = 5 OR MI = 4 THEN HTAB H + 5 * CS - 5: IMMERSE 
: VTAB VX: PRINT MUJ(5,CS): NORMAL : GOTO 530 
HTAB H: IMMERSE : VTAB VX + CS - 1: CALL - 848: PRINT 
M$(CS) : NORMAL 


530 RETURN 

540 CS = 1 + <M1 = 4) : IMMERSE 
550 HTAB H 

540 IF MI = 5 OR MI = 4 THEN VTAB VX: HTAB H ♦ 5 * CS - 5: 

PRINT HU$(5,CS): GOTO 580 
570 VTAB VX: CALL - 848: PRINT M$(CS): NORMAL 
580 VTAB 21: INVERSE : PRINT NORMAL : PRINT ' ':: IN 

VERSE : PRINT NORMAL : PRINT ' SCEGLIE . ': 

: IMMERSE : PRINT 'RETURN':: NORMAL : PRINT ' CONFERMA* 
: VTAB 22: HTAB 10: PRINT '<■; 

590 INVERSE : PRINT 'ESC';: NORMAL : PRINT ■> MENU PRINCIPA 
LE' 

400 POKE - 14348,0 

410 K = PEEK ( - 14384): IF K < 128 THEN 410 
420 POKE - 14348,0:K = K - 128: IF K < > 8 AND K < >21 

AND K < > 10 AND K < > 11 AND K < > 27 AND K < >13 

AND MI < 5 THEN 410: REM SOLE SCELTE 

430 IF MI < 5 AND (K = 78 OR K = 83 OR K = 110 OR K = 115) 

GOTO 410 
440 OS = CS 

450 IF K = 8 OR K = 11 THEN CS = CS - 1:CS = CS * (CS > 0) 

♦ S * (CS = 0): GOSUB 490: GOTO 410: REM FRECCIA SINIS 

TRA 0 IN SU 

440 IF K = 21 OR K = 10 THEN CS = CS * 1:CS = CS * (CS < = 
S) ♦ (CS = S ♦ 1): GOSUB 490: GOTO 410: REM FRECCIA D 
ESTRA 0 IN GIU' 

470 C = CS: IF MI < 5 THEN 710 
480 IF K = 78 OR K = 110 THEN CS = 2 

490 IF K = 83 OR K = 115 THEN CS = 1 

700 ON MI - 4 GOTO 810,820 
710 IF K = 27 THEN 3700: REM MENU' PRINCIPALE 
720 POKE 894,MI: POKE 895,CS: POKE 894,1: REM SALVA IL MES 
E PER RECUPERO DA ERRÓRI 

730 ON MI GOTO 740,740,770,790,810,820: REM SELEZIONE FATT 
A CS=N MESE 

740 IF CS = 13 THEN 3700: REM MENU' PRINCIPALE 
750 GOTO 2210: REM Ml=! 

740 ON CS GOTO 1730,2240,1740,3700: REM Ml=2—VISUALIZZA 
770 IF CS = 13 THEN 3700: REM MENU' PRINCIPALE 
780 GOTO 1720: REM SCELTA DEL MESE - SALVA IL NUMERO IN 'F 
2' 

790 IF CS = 13 THEN 3700: REM MENU' PRINCIPALE 
800 GOTO 2720: REM AGGI UNGERE/CAMBIARE/CANCELLARE 
810 ON CS GOTO 2750,2470: REM S/N 
820 GOTO 3170 

830 L = 20 - LEN (X») / 2: IF L < 1 THEN L = 1 
835 HTAB L: VTAB V: PRINT X$:: RETURN 
840 HTAB (20 - LEN (MIMMI, JD / 2): VTAB V: PRINT MU$(M1, 
J): RETURN 

850 IF X < 1 OR X ) N(C) THEN ER = 1 : RETURN 
840 RETURN : REM CONTROLLO ERRORE PER NUMERO 
870 VTAB 22: FOR Z = 1 TO 40: PRINT NEXT :V = 23:XJ = 
'BATTERE <F> PER FINIRE': GOSUB 830:V = 24:X» = 'BATTE 
RE ZERO (0) PER ELENCO DATE': GOSUB 830: POKE 35,21: RE 
TURN 

880 VTAB 23: PRINT '<■;: INVERSE : PRINT 'RTN';s NORPWL : P 
RINT ')';: PRINT ^CONTINUARE (':: INVERSE : PRINT 'ESC 
■i* NORMAL : PRINT ■> MENU PRINCIPALE'j 
890 RETURN 

900 'VTAB 23: PRINT 'UN TASTO PER CONTINUARE..<■;: 1WERSE : 
PRINT 'ESC'; : NORMAL : PRINT "> = MENU':: GET X*: POKE 
- 14348,0: HOME : IF X* = CHRJ (27) THEN EF = 1 
910 RETURN 

920 GOSUB 180:V = 10: FLASH :X$ = ' STO ORDINANDO GLI AWEN 
IMENT1 PER DATA': GOSUB 830: GOSUB 1010: FOR I = 1 TO 1 
500: NEXT : HOME : RETURN 
930 PRINT W'PRKl': PRINT CHR$ (0) 

940 PRINT DF'PRUO': RETURN 
950 REM 

940 REM *»**»**»«****«* 

970 REM * ORDINA * 

980 REM * * 

990 REM * AVVENIMENTI * 

1000 REM m************** 

1010 IF N = 1 THEN RETURN : REM NON OCCORRE ORDINARE 
1020 K = N - 1: FOR I = 1 TO K: REM ORDINAMENTO A BOLLE PE 
R ORDINARE NUMERICAMENTE GLI EVENTI IN ORDINE DI DATA 
1030 L = N - I : FOR J = 1 TO L 
1040 IF D(J) < 0(J + 1) THEN 1070 
1050 T = D(J):T$ = EV$(J):D(J) = D(J ♦ 1>:EV$(J) = EVJ(J + 
1):D(J + 1) = T:EV$(J ♦ 1) = T* 

1040 REM SCAMBIO COMPLETO 
1070 NEXT : NEXT : RETURN 
1080 REM 

1090 REM »** SCRIVE SUL DISCHETTO *** 


I 


16 















Ilio TEXT : GOSUB 180 
1120 ONERR GOTO 4120 

1130 V = 10: INVERSE :X1 = 1 STO SCRIVENDO * * MÌ(F) * 1 - 
' t YRi ♦ * ': GOSUB 830: NORMAL 
1140 PRINT 

1150 PRINT DÌ‘OPEN'Mt(F)YRi 
1160 PRINT Dt'URITE'MÌ<F)YRÌ 
1170 PRINT N 

1180 IF N = 0 THEN PRINT : PRINT Di’CLOSE'NKFIYRi: PRINT 
: PRINT DÌ"DELETE"MÌ(F)YRi: RETURN 
1190 FOR K = 1 TO N: PRINT D(K) 

1200 IN$ = EVÌ(K) 

1210 PRINT IN» 

1220 NEXT 

1230 PRINT Di'CLOSE" 

1240 HOME : RETURN 
1250 TEXT : GOSUB 180: LET INI = ” 1 
1260 V = 10: ItWERSE :X1 = * STO LEGGENDO 1 + Mt(F) ♦ ' - 1 
+ YRi 4 ■ GOSUB 830: NORMAL 
1270 PRINT 

1280 ONERR GOTO 4000: REM IL FILE NON ESISTE 

1290 PRINT Di'VERIFY 'MÌ(F)YRÌ 

1300 PRINT Di'OPEN'MÌ(F)YRt 

1310 VTAB 11 : CALL -953 

1320 PRINT DVREAO'MiTFIYR» 

1330 INPUT N 

1340 IF N = 0 THEN 1400: REM NESSUN AVVENIMENTO 
1350 FOR I = 1 TO N 
1360 INPUT DO) 

1370 CALL 768:11» = MIO* <1NÌ,1) 

1380 EVl(l) = IN* 


1390 

1400 

NEXT 

PRINT Di'CLOSE' 

1410 

HOME 

: RETURN 

1420 

REM 

a*****#*#**##***#* 

1430 

REM 

* * 

1440 

REM 

* FORMATTA TESTO * 

1450 

REM 

* * 

1460 

REM 

a***************** 


1470 IF NC = 0 THEN NC = 40:MC = 40: REM ROUTINE FORMATTAZ 
IONE TESTO 

1480 IF MC < NC THEN MC = MC + 40: GOTO 1480 

1490 LM = INT ((MC - NC) / 2) ♦ 1 

1500 IF LEFTi (A»,l) = ' ' THEN Ai = MIDI (Ai,2): GOTO 15 

00 

1510 IF LEN (Ai) < = NC THEN 1560 

1520 Yi = Ai: FOR J1 = NC + 1 TO 1 STEP - 1: IF MIDI (Vi, 

J1J) = ■ ■ THEN 1540 
1530 NEXT :J1 = NC + 1 

1540 Ai = LEFTi (Yi.Jl - 1): GOSUB 1560: IF J1 ) 0 THEN Ai 
= MIDi <Yt,J1> 

1550 GOTO 1500 

1560 KTAB LM: PRINT Ai;: IF LEN (Ai) < ) MC THEN PRINT 
1570 Ai = ": RETURN 
1580 REM 

1590 REM **************** 

1600 REM * * 

1610 REM * DISPLAY * 

1620 REM * » 

1630 REM **************** 

1640 TEXT 

1650 PR = 0: REM FLAG STMPMTE 
1660 GOSUB 180:J = 1:V = 2:M1 = 1; GOSUB 840: PRINT : REM 
HOME & INTESTAZIONE 1670 FOR Z = 1 TO 40: PRINT *«•; 
: NEXT : POKE 34,4 

1680 REM MENU PER SCÉLTE DI MESE,ANNO,MENU (2230-2250) 
1690 S = 3: VX = 9:H = 14:M1 = 2: GOTO 200 
1700 GOSUB 190:S = 13: REM MENU PER SCELTA MESE GEN-DIC 
1710 MI = 3:VX = 6:H = 15: GOTO 460: REM MENU' ORIZZONTALE 
1720 F2 = CS: GOTO 1750: REM SALVA LA SCELTA MESE - MENU' 
SEGUENTE PER IL DISPOSITIVO DI OUTPUT 
1730 FI = 0: GOTO 1700: REM SOLO 1 MESE 

1740 FI = li:F2 = 1 : REM ANNO INTERO 

1750 TEXT : GOSUB 190:S = 3:M1 = 1 :J = 1::VX = 7:H = 10: GO 

SUB 840 :M1 = 3: GOTO 200 
1760 REM IMPOSTA 'F' PER LETTURA DISCHETTO 
1770 MC = 40:NC = 40: GOTO 1790 

1780 MC = 80:NC = 80:PR = 1: GOTO 1790 

1790 TEXT : GOSUB 190: FOR F = F2 TO F2 + F! 

1800 PRINT : PRINT Di'PRUO' 

1810 GOSUB 1250 

1820 IF NOT N AND FI = 11 THEN 2010 
1830 IF NOT N THEN 2040 
1840 GOSUB 3470 


1850 

1860 

1870 

1880 

1890 

1900 

1910 

1920 


1930 

1940 

1950 

1960 

1970 

1980 


1990 

2000 

2010 

2020 

2030 

2040 

2050 


2060 

2070 

2080 

2090 

2100 

2110 

2120 

2130 

2140 

2150 

2160 

2170 

2180 

2190 

2200 

2210 

2220 

2230 

2240 


2250 


2260 

2270 

2280 

2290 

2300 

2310 

2320 

2330 


2340 

2350 

2360 

2370 

2380 

2390 

2400 

2410 


IF PR THEN PRINT 

PUPI •■N" 

TEXT :V = 2:XÌ = 'AVVENIMENTI PER 
YRi: INVERSE : GOSUB 830: NORMAL 
IF PR THEN PRINT : PRINT 
FOR J = 1 TO N 
Ai = STRi (D(J)) 

* EVÌ(J) 

L = LEN (MÌ(F) ♦ 

1 

IF PR THEN PRINT 


CHRi (13);: PRINT Oi'PRil*: PRINT 


' ♦ Mi(F) * 
POKE 34,4: 


HOME 


4 Mi(F) * 


4 YRi < 


4 YRI) 4 LEN ( STRi (D(J))> 4 


FOR 


1 TO 


CHRi (27); CHRi (88): 

L: PRINT CHRi (32):: NEXT 
IF PR THEN PRINT CHRi (27) CHRi (89): : PRINT CHRi ( 
27); CHRi (114);: PRINT CHRi (10): PRINT CHRi (27); 
CHRi (102): PRINT 
GOSUB 1470: REM STAMPA STRINGA 
PRINT : PRINT : IF PR THEN 1960 
IF J ( N AND PEEK (37) = > 19 THEN EF = 0: GOSUB 900 
: IF EF GOTO 3700 
NEXT J 

IF PR THEN PRINT : PRINT : PRINT : PRINT Dtj'PRKO': P 
RINT CHRi (9):"I': HOME 

POKE - 16368.0: VTAB 22: PRINT 'UN TASTO PER CONTINUA 
RE. : IWERSE : PRINT 'ESC';: NORMAL : PRINT ') = M 
ENU": : GET Xi: POKE - 16368,0: HOME : IF Xi = CHRi ( 
27) THEN 3700 
TEXT : GOSUB 190 

IF PR THEN PRINT : PRINT Di;'PRM' 

NEXT F 

PRINT : PRINT Dt'PRSO' 

GOTO 1640: REM VISUALIZZA LE SCELTE 

CALL 65338: CALL 65338: VTAB 6: GOSUB 2090 

V = 10:XÌ = 'NESSUN AVVENIMENTO PER ' 4 MÌ(F) 4 ’ ' 4 

YRi: GOSUB 830:V = 12:X1 = 'PREMI UN TASTO PER IL MENU 

': GOSUB 830: GOSUB 2090: POKE - 16368,0 

VTAB 12: HTAB 34 

GET Xi: IF NOT N THEN 3700 

GOTO 1640 


PRINT : PRINT : FOR I = 1 TO 40: PRINT NEXT : PR 

INT : RETURN 

REM 

REM *»*»*****»»*»*»**»* 

REM * * 

REM * CREA CALENDARIO * 

REM * * 

REM (ut***#***»****##»*» 

REM 
TEXT 
J = C 

GOSUB 190:V = 1:M1 = 1 : GOSUB 840: REM HOME 4 INTESTA 
ZIONE 

VX = 6:H = 15: GOTO 460: REM MENU' 

GOSUB 180:V = 1: GOSUB 840:V = 2: INVERSE :Xt = MÌ(CS) 

: GOSUB 830: NORMAL 

POKE 34,2: REM IMPOSTA LA SCN1ITA' DELLA FINESTRA 
PRINT : PRINT 

INVERSE : PRINT 'NOTA:': NORMAL :NC = 35:Ai = 'QUESTA 
PARTE DEL PROGRAMMA CANCELLERÀ' QUALSIASI AVVENIMENTO 
ESISTENTE NEL MESE SCELTO.': GOSUB 1470: PRINT 
Ai = 'PER AGGIUNGERE, CAMBIARE 0 CANCELLARE QUALSIASI 
AVVENIMENTO TORN) AL MENU PRINCIPALE E SCEGLI L'OPZION 
E AGGIUNGERE/CAMBIARE/CANCELLARE.' 

GOSUB 1470: PRINT 
GOSUB 880 

POKE - 16368,0: GET Xi 

IF Xi = CHRi (27) THEN TEXT : GOSUB 190: GOTO 3700 
GOSUB 180 


VTAB 4:NC = 40 

IF I 4 N » AD > 39 THEN PRINT CHRi (7)'N0N C'E' PIU' 
SPAZIO IN QUESTO MESE DEL CALENDARIO.': PRINT : PRINT 
■PREMI IN TASTO PER CONTINUARE.': GET Zi: PRINT : ON 
NOT (AD) GOTO 2590: RETURN 

Ai = 'INTRODUCI LA DATA DELL'AVVENIMENTO IN 1 4 MÌ(C) 
GOSUB 1470: IF I < > 1 THEN 2370 
GOSUB 870 

VTAB 14: HTAB 1: CALL - 868: PRINT MÌ(C)'(1-';N(C);') 

’;: INPUT "jINÌ<I) 

IF (INÌ(l) = ’F" OR INi(I) = CHRi (102)) AND AD THEN 
RETURN : REM TERMINA ROUTINE AGGIUNTA 
IF INi(I) = 'F' OR INÌ(I) = CHRi (102) THEN 2590: REM 
USCITA 

IF INÌ(I) = '0' AND I < 2 AND NOT N (WD AD THEN VTAB 
6:AÌ = 'NESSUNA INTRODUZIONE' : GOSUB 1470: GOTO 2370 
IF INid) = '0' AND I < 2 AND NOT AD THEN VTAB 6:AÌ 

(continua) 









i due punti e le virgolette. Se l'input ha 
superato i 159 caratteri viene troncato, 
quando si preme <RETURN>, a 159 
caratteri, e viene data l’opportunità di 
ricominciare da capo. 

Una volta introdotto l’avvenimento 
premete <RETURN> per passare a 
un’altra introduzione, o <ESC> per 
tornare al menù principale. Completa¬ 
te le introduzioni premete F (oppure f) 
per fare un ordinamento numerico 
ascendente degli avvenimenti. Quan¬ 
do questi sono ordinati viene visualiz¬ 
zato sullo schermo il messaggio STO 
SCRIVENDO "MESE", mentre le 
nuove informazioni vengono scritte 
sul dischetto sotto il nome del mese 
per cui i dati sono stati appena intro¬ 
dotti. 

Quando la scrittura sul dischetto è 
completa si viene riportati al menù 
Creare Mese. Quando avete finito di 
creare file premete <ESC> o selezio¬ 
nate l’opzione menù principale per 
tornare appunto al menù principale. 

• Visualizzare Calendario. L’opzione 
di menù Visualizzare Calendario pre¬ 


senta tre scelte. Si può scegliere tra 
visualizzare un mese o un anno intero 
o si può semplicemente tornare al me¬ 
nù principale. All’inizio si dovrà pro¬ 
babilmente scegliere un mese. Dopo 
aver fatto questa scelta si dovrà poi 
scegliere il mese che si vuol visualizza¬ 
re. 

A questo punto scegliete un mese 
per cui avete fatto qualche introduzio¬ 
ne. Se capita di scegliere un mese che 
non è stato creato o per cui non sono 
state fatte introduzioni un messaggio 
d’errore visualizza questa informazio¬ 
ne, e il programma attende che si pre¬ 
ma un tasto prima di andare avanti. 

Quando si è scelto il mese appro¬ 
priato si può scegliere se visualizzare il 
mese sullo schermo o inviarlo alla 
stampante. Se non si dispone di una 
stampante la scelta è ovvia. Comun¬ 
que prima di usare una qualsiasi delle 
opzioni di stampante leggete la sezio¬ 
ne Personalizzazione di questo artico¬ 
lo, in modo da poter utilizzare con 
efficienza i comandi della vostra stam¬ 
pante. Se scegliete l’opzione dell’anno 
intero la sola differenza nell’operazio¬ 


ne del programma è che non sarà ne¬ 
cessario fare la scelta dei mesi. 

Una volta fatta la scelta il program¬ 
ma legge i dati che si trovano nel file 
del mese scelto (o dell’anno intero, in 
sequenza per mese). Per ciascun mese 
viene stampato sullo schermo (o sulla 
stampante) un calendarietto, nel qua¬ 
le ogni data contenente un avvenimen¬ 
to è contrassegnata da una X lampeg¬ 
giante (figura 2). Questo metodo di 
indicare la data sul calendario è stato 
scelto a preferenza della visualizzazio¬ 
ne della data in modo inverso o lam¬ 
peggiante perché queste forme non 
comparirebbero sulla stampante. Se 
scegliete l’opzione di visualizzazione 
sullo schermo potete scegliere se river¬ 
sare (dump) la schermata sulla stam¬ 
pante (premendo S) o interrompere 
l’elencazione e tornare al menù princi¬ 
pale (premendo <ESC>). La pressio¬ 
ne di qualunque altro tasto permette la 
continuazione dell’elencazione. 

Dopo la visualizzazione del calen¬ 
dario gli avvenimenti vengono elenca¬ 
ti per data (con l’impiego della routine 
di formattazione del testo) sullo scher¬ 
mo (o sulla stampante), con un 
prompt alla base dello schermo, che 
permette di smettere o di proseguire 
passando alla successiva pagina di av¬ 
venimenti (figura 3). Quando la lista 
degli avvenimenti è stata visualizzata 
si viene ricondotti al sottomenù Visua¬ 
lizzare. Visualizzati gli eventi voluti, 
selezionate l’opzione menù principa¬ 
le. 

• Aggiungere/Cambiare/Cancellare. 
Adesso provate ad aggiungere qualco¬ 
sa alle informazioni fin qui generate, a 
modificarle o a cancellarle. Fate la 
scelta appropriata sul menù principa¬ 
le. Viene visualizzato il sottomenù che 
permette di scegliere fra Aggiungere- 
/Cambiare/Cancellare e Menù princi¬ 
pale. Scegliete Aggiungere. Anche in 
questo caso dovrete scegliere il mese 
nel quale volete aggiungere un avveni¬ 
mento; scegliete un mese per il quale 
avete almeno un avvenimento. Si può 
scegliere anche un mese vuoto, ma le 
caratteristiche dell’editing risalteran¬ 
no di più se nel mese ci saranno diverse 
voci. Il programma legge il file del me¬ 
se scelto, e vi dà modo di confermare 
la vostra scelta (cioè di dire che volete 
aggiungere un avvenimento per il me¬ 
se scelto). 

Come in qualsiasi altro menù dove¬ 
te scegliere fra sì e no. Il default è sì. 
Procedete come nell’opzione Creare 
Mese, introducendo prima la data, poi 
('avvenimento. I prompt alla base del¬ 
lo schermo spiegano le scelte possibili. 


TAVOLA 1: 

Impiego delle uariabi1i 

VARIABILE 

UTILIZZO 

MU*(M1,M2> 

Stringhe dei menù 

ttt() 

Nome dei mesi 

EV$<) 

Stringa dell'avvenimento 

n 

Stringa di stampa (solitamente centrata) 

M 

Stringa Formattazione testo 

Y$ 

Stringa Formattazione testo (temporanea) 

m 

Insieme dei menù (1-6) 

M2 

Voce di menù nell'insieme 

I,J,K 

Contatori generali 

N 

Numero degli avvenimenti in un mese 

FI 

Numero di File del mese 

ED 

Flag di editing per una scrittura sul dischetto 

DL 

Flag di cancellazione 

OS 

Flag di visualizzazione 

AD 

Flag di aggiunta avvenimento 

MC 

Numero massimo di colonne nella Formattazione del testo 

NC 

Numero di colonne volute nella Formattazione del testo 

LM 

Tabulazione per la Formattazione del testo 

H 

Altezza del riquadro di visualizzazione del calendario 

B 

Numero di righe nel riquadro del calendario (5) 

M 

Giorni in un mese nel display del calendario 

R 

Riga della data di calendario 

CO 

Colonna della data di calendario (1-7) 

W. 

OFFset di tabulazione verticale dei menù 

OS 

Vecchia scelta di menù 

CS 

Scelta corrente di menù 

S 

Numero delle scelte di menù (M2) 

H 

Tabulazione orizzontale per il menù 

VS7. 

Spaziatura verticale per il menù 

NO 

Giorni in ciascun mese 

DO 

Data dell'avvenimento 
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Anche in questo caso quando si smette 
(F) gli avvenimenti vengono ordinati, 
poi scritti sul dischetto, e sì viene ri¬ 
portati al menù Aggiungere/Cambia¬ 
re/Cancellare. 

Questa volta scegliete l’opzione 


Cambiare/Cancellare. Scegliete lo 
stesso avvenimento al quale avete ap¬ 
pena fatto 1’aggiunta, e come prima 
confermate che effettivamente volete 
cambiare/cancellare, scegliendo il de¬ 
fault sì quando siete invitati a decidere 
se sì o no. Lo schermo visualizzerà il 
primo avvenimento del mese, assieme 
a una riga di stato sopra l’avvenimen¬ 
to, la quale elenca il numero dell’avve- 
nimento visualizzato, il numero totale 
degli avvenimenti e la data dell'avve- 
nimento che viene mostrato. Sotto 
l’avvenimento si trovano tre righe di 


prompt che spiegano come scorrere gli 
avvenimenti e descrivono i tasti da 
usare per la modifica o la cancellazio¬ 
ne dell'avvenimento visualizzato. È 
opportuna una breve descrizione di 
ognuno di questi prompt: 


Le frecce in su e in giù non figurano 
nelle righe dei prompt, ma nel ile e nel 
Ile faranno lo scorrimento in conformi¬ 
tà. 

Prima di porre mano alle caratteri¬ 
stiche di modifica o di cancellazione 
scorrete gli avvenimenti del mese con 
le frecce o con il tasto <RETURN>, 
per abituarvi al sistema. Dovreste no¬ 
tare che c’è nello scorrimento una ca¬ 
ratteristica di ripetizione ciclica. Dopo 
la visualizzazione dell’ultimo avveni¬ 
mento viene rivisualizzato il primo. 
Per converso, se viene scelto lo scorri¬ 


mento all’indietro. quando si è sul pri¬ 
mo avvenimento viene poi visualizza¬ 
to l’ultimo. In tal modo non si è mai a 
più di metà distanza da un qualsiasi 
evento. Quando vi sentite a vostro 
agio con questa procedura scegliete 
l'avvenimento e premete E per fare le 
modifiche. 

Quando si accede al modo editing lo 
schermo si pulisce e compaiono nuovi 
prompt. A questo punto si può o man¬ 
tenere l’avvenimento com’è, premen¬ 
do il tasto <RETURN>, e tornare 
all’opzione Cambiare/Cancellare, o 
introdurre nuove informazioni che so¬ 
stituiranno quelle attualmente visua¬ 
lizzate sullo schermo. È questa la ra¬ 
gione principale per cui sono permesse 
solo quattro righe di testo per l’input. 
Se ne venissero ammesse di più lo 
schermo sarebbe troppo ingombrato e 
i due avvenimenti potrebbero essere 
sovrascritti sullo schermo. Quando si è 
completata la nuova immissione le 
nuove informazioni sono scritte sullo 
schermo e si è ricondotti alla scherma¬ 
ta Cambiare/Cancellare, con il corren¬ 
te avvenimento sullo schermo. 

Adesso scorrete attraverso le voci 
introdotte e scegliete quella per cui 
non avete un particolare attaccamen¬ 
to. E quella che cancellerete. Così, 


TASTO 

FUNZIONE 

<RETURN> 

Scorre in avanti lungo gli avvenimenti 

Freccia destra 

Come <RETURN>, cioè scorre in avanti 

Freccia sinistra 

Scorre a ritroso, cioè visualizza l'avvenimento precedente 

<ESC> 

Esce dalla routine e torna al menù principale 

C 

Introduce il modo editing per l'avvenimento visualizzato 

0 

Introduce il modo cancellazione per l'avvenimento visualizzato 





Listati di chimica generale per 
simulare esperimenti di labora¬ 
torio. Gli argomenti trattati, in¬ 
trodotti da una spiegazione 
generale, fanno parte dei pro¬ 
grammi ministeriali della scuola 
superiore. 

154 pagine, 20.000 lire 

Introduzione graduale al lin¬ 
guaggio Forth, molto adatto per 
compiti tecnici, corredata da e- 
sercizi e da un glossario. 

247 pagine, 24.000 lire 



Gli elementi essenziali del Lisp, 
con numerosi programmi subito 
utilizzabili. 

216 pagine, 19.000 lire 


Chimica con il 
personal computer 



Una guida a questo linguaggio 
che consente programmi sofi¬ 
sticati e procedimenti interattivi. 
132 pagine, 10.000 lire 


CAPIRE 
IL PHOT 


IL PHOT E UN LINGUAGGIO Ol 
PROGRAMMAZIONE ESTREMAMENTE 
PACHE OA IMPARARE MA CONSENTE 
PROGRAMMI SOFISTICATI E 
PROCEDIMENTI INTERATTIVI IL SUO 
IMPIEGO PARTICOLARMENTE 
ORIENTATO ALLE APPLICAZIONI 
DIDATTICHE. E ALLA PORTATA Ol 
TUTTI. VISTO CHE IN POCHI MINUTI 
CHIUNQUE PUÒ INIZIARE 
A PADRONEGGIARLO 



progettazione dei 
circuiti a transistor 



Una guida all'analisi e alla pro¬ 
gettazione di circuiti a transistor 
con esempi di progetti. 

302 pagine, 18.000 lire 


L 


Desidero acquistare 

□ ... 

□ . 

□ . 

Pagherò al postino il prezzo indicato + 1.000 lire per contributo spese postali 
□ Desidero solo ricevere il vostro catalogo generale 
Ritagliate e spedite a: 

gruppo editoriale muzzio - via makallè 73 - 35138 padova 

nome.cognome. 

via. 

c.a.p.città. 
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prendete la decisione, per quanto dura 
possa essere, e poi premete D. Sapen¬ 
do che tutti di quando in quando sba¬ 
gliamo il programma vi dà modo di 
fare marcia indietro rispondendo di no 
(il default) alla domanda "Sei sicuro di 
voler cancellare questo avvenimen¬ 
to?". Scegliendo sì il processo di can¬ 
cellazione potrà andare avanti, men¬ 
tre la decisione no vi riporterà alla 
stessa configurazione che avevate ap¬ 
pena lasciato in Cambiare/Cancellare. 
Se confermate la cancellazione il file 
modificato viene scritto sul dischetto e 


siete ricondotti al menù Cambiare/ 
Cancellare. 

Se avete finito di modificare e can¬ 
cellare, usate <ESC> per uscire dalla 
routine e tornare al menù principale. 
• Visualizzare/Cambiare Anno. L’ul¬ 
tima funzione disponibile nel menù 
principale visualizza l'anno in corso. 
Se volete solo vedere se è impostato a 
dovere, scegliete sul menù principale 
l’opzione Visualizzare/Cambiare An¬ 
no, date un’occhiata e premete <RE- 
TURN> per tornare al menù princi¬ 
pale. Se volete cambiare l’anno ri¬ 


spondete al prompt con un anno di 
quattro cifre (1753 o successivo). 

Il programma 

Per digitare il programma Memo- 
desk battete il listato 1 e salvatelo con 
il comando: 


SAVE MEMODESK 


Il programma contiene diverse utili 
subroutine. Per tenere in ordine gli 
avvenimenti del calendario occorreva 


2420 


2430 

2440 

2450 

2460 


2470 

2480 

2490 

2500 

2510 


2520 

2530 


2540 


2550 


2560 

2570 

2580 

2590 

2600 

2610 

2620 

2630 

2640 

2650 

2660 

2670 

2680 

2690 

2700 

2710 

2720 

2730 

2740 

2750 

2760 

2770 

2780 

2790 

2800 


= "NESSUNA INTRODUZIONE": GOSUB 1470: GOTO 2370 
IF INNI) = "0" THEN VTAB 6: POR J = 1 TO N * AD + I 
- 1:A$ = Ai ♦ STRJ (D(J)) + " ": NEXT : GOSUB 1470: G 
OTO 2370 

X = VAL UN*U>): GOSUB 850: IF ER = 1 THEN ER = 0: P 

OKE 34.0: P0KE 35,24: GOTO 2320 

IF AD THEN D(N ♦ 1) = X: GOTO 2460 

DO) = X: REM DATA DELL'AVVENIMENTO 

GOSUB 190:V = 4:X$ = "INTRODUCI AV/ENIMENTO/I PER LA D 

ATA": GOSUB 830:X* = "DEL " * STRI «) + "’ + M»(C): 

V = 5: GOSUB 830: PRINT : PRINT 

FOR Z = 1 TO 40: PRINT NEXT : PRINT 

CALL 768 : IN* = MID$ (Il«,l) 

IN$(I) = INI 

IF (1N*0) = "F" OR IN»0) = CHRi (102)) AND AD THEN 
RETURN : REM TERMINA ROUTINE AGGIUNTA 
IF LEN (IN»(D) > 159 THEN IN$(I) = LEFT* (IN»0),15 
9): VTAB 10: HTAB 1: CALL - 958: VTAB 11: PRINT "INTR 
0DU2I0NE TRONCATA A 159 CARATTERI.": PRINT "RICOMINCK 
S/N)? ’:: CALL 65338: CALL 65338: POKE - 16368,0: GET 
X*: PRINT XI: ON X$ = "S" GOTO 2460 
IF IN*(I) = "F" OR IN*(I) = CHR* (102) THEN 2590: REM 
USCITA 

IF INJO) = "0‘ AND I < 2 AND NOT N AND AD THEN VTAB 
9:A$ = "NESSUNA INTRODUZIONE - UN TASTO PER CONTINUA 
RE": GOSUB 1470: VTAB 9: HTAB 34: POKE - 16368,0: GET 
XI: GOTO 2460 

IF IN$(I) = "0" AND I < 2 AND NOT AD THEN VTAB ?:A$ 

= "NESSUNA INTRODUZIONE - UN TASTO PER CONTINUARE": G 
OSUB 1470: VTAB 9: HTAB 34: POKE - 16368,0: GET X*: G 
OTO 2460 

IF IlttU) = "0" THEN VTAB 9: FOR J = 1 TO N + I - 1 :A 

* = A* ♦ STR$ (D(J)) + " NEXT : GOSUB 1470: VTAB 1 

2:A$ = "UN TASTO PER CONTINUARE..": GOSUB 1470: VTAB 1 

2: HTAB 22: POKE - 16368,0: GET X$: GOTO 2460 

IF AD THEN EV*(N ♦ I) = INSTI): GOTO 2580 

EV$(I) = It»(I): REM DESCRIZIONE DELL'AVVENIMENTO 

1 = 1 + 1: GOSUB 130: IF I + N * (AD) < 40 GOTO 2320: 

REM UN'ALTRA INTRODUZIONE 

IF I < 2 THEN TEXT : GOSUB 190: GOTO 3700 

N = I - 1:F = C: GOSUB 920: GOSUB 1110: REM ROUTINE 

SCRITTURA DISCO DOPO ORDINAMENTO 

GOTO 2190: REM UN ALTRO MESE’ 

REM ******************* 

REM * * 

REM * CAMBIA/CANCELLA » 

REM * * 

REM ******************* 

TEXT 

MI = 1:V7. = 6:H = 15:V = 2:S = 3: GOSUB 180:J = 3: W 

ERSE : GOSUB 840: NORMAL :M1 = 4: GOTO 200 

FLAG = CS: REM AGGIUNGE 2=CAMB1A/CANCELLA 3=MENU' 

TEXT : GOSUB 190:M1 = 4:J = FLAG:V = 1: INVERSE : GOSU 

B 840: NORMAL : REM INTESTAZIONE 

GOTO 460 

F = CS: GOSUB 1250: REM LEGGE FILE 

VTAB 3: PRINT MUI(4,FLAG): PRINT " IN ";M»(CS);"?"; 

S = 2:H = 18:VX = 4:M1 = 5: GOTO 470 
ON FLAG GOTO 2760,2890,3700 
TEXT : GOSUB 190 

X* = "AGGIUNGERE AVVENIMENTO": INVERSE :V = 1 : GOSUB 8 
30: NORMAL : REM INTESTAZIONE 
PRINT : VTAB 2 

FOR I = 1 TO 40: PRINT NEXT 
POKE 34,3: REM SOMMITÀ' DELLA FINESTRA 


2810 AD = 1:C = F: GOSUB 2300: REM FLAG AGGIUNTA (AD) E RO 
UTINE 'CREA' 

2820 AD = 0: REM AZZERA FLAG AGGIUNTA 

2830 GOSUB 180 

2840 IF I < 2 THEN 2670 

2850 N = N + I - 1 : REM INCREMENTA IL NUMERO DEI RECORD 
2860 GOSUB 920 

2870 TEXT : GOSUB 190: GOSUB 1110 

2880 GOTO 2670: REM MENU' AGGIUNGERE/CAMBIARE 

2890 GOSUB 180 

2900 IF CH = 1 THEN CH = 0: GOSUB 1110: REM SCRIVE FILE MO 
DIFICATO 

2910 IF NOT N THEN GOTO 2040 

2920 VTAB 21: FOR K = 1 TO 40: PRINT NEXT : CALL - 9 
58 

2930 VTAB 22: HTAB 3: PRINT INVERSE : PRINT "RTN"; : N 
ORMAL : PRINT "> 0 INVERSE : PRINT NORMAL : 
PRINT " SCORRIMENTO IN AVANTI" 

2940 VTAB 23: INVERSE : PRINT NORMAL : PRINT " SCORR 

IMENTO INDIETRO ’:: INVERSE : PRINT "'D'";: NORMAL : P 
RINT ’ CANCELLARE’ 1 

2950 VTAB 24: HTAB 2: PRINT INVERSE : PRINT "ESC":: N 

ORMAL : PRINT ") = MENU ";: INVERSE : PRINT ' 

'C'"j: NOfttAL : PRINT " CAMBIARE" : 

2960 POKE 35,20: REM IMPOSTA I PROMPT DELLA FINESTRA 
2970 IF DL = 1 THEN DL = 0: RETURN 
2980 V = 2:M! = 4:J = FLAG: GOSUB 840: FOR K = 1 TO 40: PRI 
NT NEXT : POKE 34,3: REM FINESTRA 
2990 FOR I = 1 TO N 
3000 HOME 

3010 'VTAB 5: PRINT "AVVENIMENTO N." ;I : TAB( 15)" DI "N" 

HTAB 23: PRINT "DATA="D<I)" "Mt(F)" "; 

3020 POKE 34,6: REM FINESTRA PIU' GRANDE 
3030 At = EV$(I): VTAB 8: GOSUB 1470 
3040 VTAB 24: HTAB 19: GET X$: POKE - 16368,0 
3050 IF I = N THEN IF X$ = CHI» (13) OR X$ = CHI» (21) 0 
R X* = CHI» (10) THEN 1=1: GOTO 3000: REM RITORNA 
ALL'INIZIO 

3060 IF X$ = CHI» (13) OR Xt = CHRI (21) OR X$ = CHI» (1 
0) THEN NEXT 

3070 IF 1 = 1 AND <X$ = CHR* (8) OR X$ = CHI» (11)) THEN 
I = N: GOTO 3000: REM CONTINUA SCORRIMENTO INDIETRO 

3080 IF X» = CHI» (8) OR X$ = CHI» (11) THEN I = 1 - 1: G 
OTO 3000 

3090 IF X$ = "D" OR X$ = CHI» (100) THEN 3140: REM CANCEL 
LA IL RECORD DOPO AVER CONTROLLATO SE "SICURO" 

3100 IF X$ = "C" OR X$ = CHI» (99) THEN 3230: REM CAMBIA 
RECORD E CONTROLLA SE "SICURO" 

3110 IF X* = CHRi (27) AND CH = 1 THEN GOSUB 1110:CH = 0: 
GOTO 2670 

3120 IF XI = CHR$ (27) THEN 2670 
3130 GOTO 3040 

3140 POKE 35.24: HOME : VTAB 10 :A* = "SEI SICURO DI VOLER C 

ANCELLARE QUESTO AVVENIMENTO DAL FILE? " 

3150 GOSUB 1470 

3160 S = 2:H = 23:V/ = 11 :M1 = 6: GOTO 470 
3170 IF CS = 1 THEN 3340: REM CANCELLA 
3180 DL = 1 : POKE 35,24: GOSUB 2890: GOTO 3000: REM RESET 
SCHERMO 

3190 REM ********** 

3200 REM * CAMBIA * 

3210 REM »#*»»***** 

3220 REM 

3230 POKE 35,24: POKE 34,21: REM IMPOSTA FINESTRA ISTRUZIO 

(continua) 


mm 
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AVVENIMENTI PER 

DICEMBRE - 

1985 

t DICEMBRE - 1985 - 

COMPLEANNO 


5 DICEMBRE - 1985 - 

ONOMASTICO 


12 DICEMBRE - 1985 

- PAGAMENTO 

BOLLETTA 

ACQUA POTABILE 



15 DICEMBRE - 1985 

- TELEFONARE 

A 

GIOVANNI 



20 DICEMBRE - 1935 

- APPUNTAMENTO PER 

ACQUISTO CASA 



UN TASTO PER CONTINUARE..<ESC> 

= MENU? 


Figura 3: dopo la visualizzazione del calendario, compare l'elenco degli 
avvenimenti da ricordare, ordinati a seconda della data. 


qualche tipo di routine di ordinamen¬ 
to. Poiché raramente ci saranno più di 
20 avvenimenti in calendario per un 
qualsiasi mese (anche se il programma 
ne accetterà 40) si utilizza un semplice 
ordinamento a bolle (che è semplice e 
veloce, con pochissime variabili). È 
situato nelle linee 1020—1080. Si note¬ 
rà forse una pausa se si hanno molti 
avvenimenti, ma è una cosa che proba¬ 
bilmente si può sopportare. 

Notate anche che la routine di input 
degli avvenimenti (linee 1370 e 2480) 
permette l'immissione di qualsiasi ca¬ 
rattere della tastiera, virgole, due pun¬ 
ti e virgolette compresi. Ciò è reso 
possibile da una breve routine (è di 23 
byte) inserita in memoria con POKE a 
partire dalla locazione di memoria 768 
($300). 

La routine di formattazione del te¬ 
sto è stata pubblicata su Applicando 
n.18 con il titolo "Impaginatore di 
Messaggi", e permette la visualizzazio¬ 
ne sullo schermo (a 40 colonne) e sulla 
stampante (a 80 colonne) senza parole 
spezzate alla fine delle righe. È una 
routine molto comoda per visualizzare 
le lunghe stringhe che possono esser 
create durante l’immissione in questo 
programma di avvenimenti particola¬ 
reggiati. 

Le routine di generazione dei menù 


sono modellate sulCAutoschermo" 
(Applicando n.15). È stata però fatta 
una modifica per consentire lo scorri¬ 
mento delle voci di menù in orizzonta¬ 
le anziché in verticale, come nella scel¬ 
ta dei mesi e nelle opzioni sì/no. La 
routine di menù verticale comincia a 
linea 200, mentre il menù orizzontale 
comincia a linea 500. 

Per ridurre al minimo le possibilità 
di una perdita dei dati o di un blocco 
del programma è stata incorporata nel 
Memodesk una routine esclusiva di in- 
trappolamento degli errori, che utiliz¬ 
za le variabili speciali interne al pro¬ 
cesso di selezione del menù, MI (insie¬ 


me dei menù) e CS (selezione cursore 
corrente), per determinare se l’esecu¬ 
zione del programma debba riprende¬ 
re dopo che si è incontrato l’errore. 
Quando è-stata fatta la selezione del¬ 
l’opzione di menù i valori di queste 
due variabili vengono scritti in memo¬ 
ria con POKE, in due byte inutilizzati 
alla fine della routine di input (linee 
390 e 720) e in un terzo byte viene 
inserito con POKE uno zero o un uno, 
a seconda che sia utilizzato il menù 
verticale o quello orizzontale. Ciò per¬ 
mette alla routine ONERR di tornare 
all'ultima selezione di menù alla quale 
si era avuto accesso dopo che è stato 


NI 

8 * I * H: PRINT CHRi (33):: NEXT I,J 

3240 HOME : PRINT 1 INTRODUCI NUOVO AWENIMBtTO": PRINT '-0 

3530 FOR I = 1 T0 M:D = I + FM(F) - 1 :DX = D / 7:DD = INT 

- <" : : INVERSE : PRINT ’RTN"; : NORMAL : PRINT ■> PER C 

(7 * (DX - INT (DX) * .00001)):UK = INT (DX) 

ONFERMARE" 

3540 VTAB <<UK * 1) * 3) t 1: HTAB DD * 5 ♦ 4: PRINT I;: NE 

3250 POKE 34,13: POKE 35,20: HOME : CALL 768:1N4 = MIDi (1 

XT 

N*,1):X4 = IN$ 

3550 FOR I = 1 T0 N 

3260 IF X* = " THEN CH = 0: GOTO 3180 

3560 D = D(I) + FM(F) - 1 :DX = D / 7:CL = INT (7 * (DX - 

3270 EVtil) = Xi: POKE 34,6: POKE 35,20: HOME : VTAB 8:A$ = 

INT (DX) + .00001)) 

EVÌ(I): GOSUB 1470 

3570 R = INT (DX) 

3280 CH = 1: GOTO 3180 

3580 VTAB <(R * 1) * 3) * 2: HTAB CL * 5 * 7: FLASH : PRINT 

3290 REM 

"X" : NORMAL 

3300 REM ********** 

3590 NEXT 

3310 REM *CANCELLA* 

3600 IF PR THEN 3620 

3320 REM ********** 

3610 VTAB 22: HTAB 6: PRINT "'S' PER STAMPARE LO SCHERMO" 

3330 REM 

3620 POKE - 16368,0: VTAB 23: HTAB 1: PRINT 'UN TASTO PER 

3340 HOME :CH = 1: REM FLAG CAMBIAMENTO FILE 

CONTINUARE.; : IfWERSE : PRINT 'ESC 1 :: NORMAL : PRIN 

3350 IF N = 1 THEN N = 0:X$ = CHR1 (27): GOTO 3110 

T ’> = MENU ":: GET X$: POKE - 16368,0: IF X$ = CHR4 

3360 V = 10:X$ = 1 CANCELLA AVVENIMENTO " : FLASH : GOSUB 83 

(27) THEN 3700 

0: NORMAL 

3630 IF PR THEN 3660 

3370 FOR J = 1 T0 1000: NEXT 

3640 IF X» = "S" OR Xi = CHR4 (115) THEN POKE 8,20: VTAB 

3380 IF 1 < N THEN FOR J = I T0 N - 1:D(J) = D(J * 1):EV$< 

20: PRINT : GOSUB 930: GOSUB 4460: POKE 8,23: PRINT Di 

J) = EV$(J + 1): NEXT :N = N - 1: GOTO 2890 

"PR#1 ": PRINT CHRi (13):: PRINT «"PRHO": GOTO 3680 

3390 IF I = N THEN N = N - 1: REM ULTIMA INTRODUZIONE NEL 

3650 HOME : RETURN 

FILE 

3660 VTAB 22: HTAB 1: CALL - 958: VTAB 22: PRINT : REM PU 

3400 GOTO 2890 

LISCE BASE DELLO SCHERMO 

3410 REM 

3670 IF PR THEN POKE 8,18: GOSUB 930: GOSUB 4460: REM STA 

3420 REM *********** 

MPA SCHERMATA 

3430 REM * DISEGNA * 

3630 POKE - 16368,0: VTAB 21: CALL - 958: VTAB 22: HTAB 1 

3440 REM * CALEND. * 

: PRINT "UN TASTO PER CONTINUARE..":: PRINT "<"j: IWE 

3450 REM *********** 

RSE : PRINT "ESC":: NORMAL : PRINT *> = MENU";: GET X» 

3460 REM 

: 0N X* = CHRi (27) GOTO 3700: HOME : RETURN : REM 

3470 TEXT : GOSUB 190:M = N(F):B = 5:H = 3: REM M=GI0RNI N 

CONTINUA LA STAMPA 

EL MESE—H=0FFSET ORIZZONTALE—B= LARGHEZZA RIQUADRO 

3690 GOSUB 190: VTAB 10: HTAB 18: PRINT "FINE": END 

3480 PRINT 

3700 TEXT : HOME : PRINT '********************************* 

3490 V = i:XÌ = M$(F) * " - " * YR$: GOSUB 830 

*»*****’;: 

3500 NR = 5 - (F = 2 AND FM(2) = 0) + (FM(F) + M > 35): FOR 

3710 HTAB 1: PRINT "*";: HTAB 40: PRINT "*"; 

I = 0 T0 NR: KTAB H 

3720 PRINT TAB( 1)"**: TAB( 12)" MEMODESK"; TAB( 4 

3510 VTAB (I t 1) * H: FOR J = 1 T0 36: PRINT CHRi (45):: 

0)"*"; 

NEXT J,I 

3730 PRINT TAB( 1)"*"; TAB( 19)"DI’j TABI 40)’*"; 

3520 FOR J = H T0 NR * H * H: VTAB J: FOR I = 0 T0 7: HTAB 

3740 PRINT TABI 1)’*’; TABI 13)"MARK R. CRAVEN"; TABI 40)" 


(continua) 
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El MMlL LÌ.LTJ 

Il tuo nuovo computer 
subito al lavoro 


Per chi è ancora 
indeciso 

sull'acquisto del suo 
nuovo computer 
Apple Ile o Apple Ile, 
una proposta che 
non si può rifiutare. 

Nella magnifica 
valigetta, tutto quello 
che occorre per 
usare subito il tuo 
nuovo personal. 

Lo troverai presso i 
rivenditori di prodotti 
Apple elencati qui 
sotto, che saranno 
felici di regalartelo 
all'acquisto di un 
sistema Apple Ile o 
Apple Ile. 

Il suo valore? 

Ben 295.000 lire! 



Elenco dei rivenditori che offrono lo Starter Kit® a chi acquista un sistema Apple// 


PIEMONTE 

D.R. Via Morena 3 Novara 
D.R. Viale XX Settembre 19 Novara 
Dimensione Personal Via Bertela 22E Torino 
Tecnosystem Corso Francia 12 Torino 
Informatica Biella Piazza S. Paolo 1 Biella VC 
LOMBARDIA 

Irpe Informatica Via Cadorna 1A Como 

Il mondo dell'Informatica Via Pitentino 8 Bergamo 

Computerlandia Polli Viale Martiri della Libertà 72 Lissone MI 

L'amico del computer Via Castellini 27 Melegnano MI 

All'Informatica Via Lazzaretto 2 Milano 

All'Informatica Via Vigevano 8 Milano 

Indico Via Marco d'Agrate 1 Milano 

Small Business Computer Via Vitruvio ang. Settem. Milano 

Senna Computer Shop Via Calchi 5 Pavia 

TRE VENEZIE 

SI.GE. Computer Shop Via Piave 28 Trento 
ComputerMarket Via Valdirivo 6 Trieste 
PS Elettronica Via Tavagnacco 89 Udine 
Saving Computer Via Gramsci 52 Mirano VE 
Esacomp Via Roveggia 43 Verona 


EMILIA 

Computer Line Via Coletti 61 Rimini FO 
PC personal computer Via Chiapponi 42 Piacenza 

TOSCANA 

Paoletti Ferrerò Via II Prato 40 R Firenze 
CO-DI Via 1 ' Maggio 20/22 Margine Coperta PT 
C.D.E. Viale Adua 350 Pistoia 
Memor Informatica Via Togliatti 4 Perignano PI 

MARCHE 

Rinascita Informatica Corso Trento e Trieste 17 Ascoli Piceno 
O.C.S.A. SS Adriatica-Quadrifoglio Vasto CH 

UMBRIA 

Linea Informatica Via Garibaldi 81 Foligno PG 
Ready:Computer Via Adriatica 49 Ponte S. Giovanni PG 

ABRUZZO 

O.C.S.A. Viale Marconi 361 Pescara 

CAMPANIA 

ICC Elettronica Via degli Imbimbo 126 Avellino 
Golden Computers Viale Michelangelo 7 Napoli 

BASILICATA 

Lucana Sistemi Via Don Minzoni 28 Matera 

CALABRIA 

Ce.S.i.M. Via Carlo V 174 Catanzaro 
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3750 KTf$B 1; PRINT '«':: HTAB 40: PRINT '»': 

3760 HTAB 1: PRINT '* (C) 1985 BY APPLICANDO & MICROSPARC 

3770 HTÀB li PRINT ■** : : HTAB 40: PRINT ■*"; 

3780 PRINT '**♦****#**':: UWERSE : PRINT 1 MENU PRINCIP 

ALE ’:: NORMAL : PRINT '**♦*******';: 

3790 H = 10:VX = 10:S = 5:C = I:VSX = 2:M1 = 1:FLAG = 0: RE 
M PARAMETRI PER IL MENU' PRINCIPALE 
3800 GOTO 240 

3810 REM VOCI MENU' PRINCIPALE MU$(1,X) 

3820 DATA 'VISUALIZZARE CALENDARIO",'CREARE MESE".'AGGIUN 
GERE/CAMB1ARE/CANCELLARE' /VISUALI ZZARE/CAMBIARE AMO' 
.'FINE' 

3830 REM DATI MESI DELL'AMO M*(X) 

3840 DATA 'GENNAIO" 'FEBBRAIO',"MARZO".'APRILE' 'MAGGIO',' 

GIUGNO'. ‘LUGLIO*,'AGOSTO'/SETTEMBRE','OTTOBRE','NOVE 
MBRE','DICEMBRE' 

3850 DATA 'MENU PRINCIPALE' 

3860 : 

3870 DATA 162,0,32,117,253,160,2 

3880 DATA 138,145,105,000,169.0 
3890 DATA 145,105.200,149,2,145 
3900 DATA 105,76,57,213 
3910 REM GIORNI IN CIASCUN MESE NIX) 

3920 DATA 31,29.31,30.31,30,31,31.30,31,30.31 

3930 REM VISUALIZZA MENU' AWENIMENTI MUÌ($.X) 

3940 DATA "UN MESE'/ANNO INTERO'/MENU PRINCIPALE' 

3950 REM DISPLAY MENU' STAMPA MU$(3,X) 

3960 DATA ‘SOLO SCHERMO'/STAMPANTE - 80 COL' /MENU PRINC 
1 PALE' 

3970 REM MENU' AGGI UNGERE/CAMBIARE/CANCELLAREE MUÌI4.X) 
3980 DATA "AGGIUNGERE AVVENIMENTO',*CAMBIARE/CANCELLARE 
'/MENU PRINCIPALE' 

3990 DATA ■SI'" "NO * 

4000 IF PEEK (22$) = 5 THEN PRINT PEEK (222): GOTO 4030 

4010 1F PEEK (222) = 6 THEN 4060 

4020 GOTO 4120 

4030 PRINT D»'OPB4'M*(F)YR» 

4040 PRINT D*;'CLOSE'M*(F)YR* 

4050 PRINT W:'DELETE'M$(F)YR$ 

4060 PRINT DI'OPEN "M$(F)YR4 
4070 PRINT D$'URITE'M*(F)YR» 

4080 PRINT 0,0," 

4090 PRINT M'CLOSE'M$(F)YRi 
4100 POKE 216,0 
4110 RÉSUMÉ 
4120 TEXT : HOME :V = 8 

4130 IF PEEK (222) = 4 THEN X$ = ' DISCO PROTETTO IN SCRIT 
TURA ’: GOSUB 830: GOTO 4200 

4140 IF PEEK (222) = 8 THEN X* = 'ERRORE DI I/O—CONTROLLA 
SPORTELLO DRIVE': GOSUB 830: GOTO 4200 
4150 IF PEEK (222) = 9 THEN X$ = ' DISCO PIENO -- CAMBIARE 
DISCO ': GOSUB 830: GOTO 4200 

4160 IF PEEK (222) = 10 THEN X» = 'FILE PROTETTO—VUOI SBL 
CICCARLO? (S/N) ?': GOSUB 830: CALL 65338: CALL 65338: 
POKE - 16368,0: GET X$: IF LEFT» <X*,1) = 'N' OR LE 
FT$ (Xi,l) = CHR$ (110) THEN PRINT : PRINT ' NON POS 


SO CONTINUARE ': END 

4170 PRINT :V = 8: IF PEEK (222) = 6 THEN X* = 'IL PROGRtfl 
M NON E' SUL DISCO': TEXT : HOME : GOSUB 830:V = 9:X$ 
= 'NON POSSO CONTINUARE': GOSUB 830: END 
4180 IF PEEK (222) = 10 THEN Xt = ' STO TOGLIENDO PROTEZIO 
NE AL DISCO': VTAB 8: CALL - 868: GOSUB 830: PRINT : 
PRINT W'UNLOCK'M*(F>YR$: GOSUB 1110: GOTO 4200: REM 
RISCRIVE IL FILE 

4190 HOME : PRINT 'ERRORE ' PEEK (222)' A LINEA ' PEEK (219 
) * 256 + PEEK (218) 

4200 VTAB 20: HTAB 1: PRINT 'PREMI QUALSIASI TASTO PER CONT 
INUARE./;: POKE - 16368,0: GET X$ 

4210 DL = 0 

4220 M! = PEEK (894):CS= PEEK (895): ON PEEK (896) + 1 
GOTO 400,730: REM TORNA ALL'ULTIMO MENU' USATO DOPO 
L'ERRORE 

4230 REM *» RICEVE UN NUOVO ANNO 

4240 HOME : VTAB 6: PRINT '#«0 CORRENTE: "YR4: VTAB 22: PR 
INT ' (RETURN) PER MANTENERE LO STESSO AMO' 

4250 VTAB 12: CALL - 868: VTAB 12: PRINT 'IMMETTI NUOVO AN 
NO (YYYY): ':: INPUT ";YY$ 

4260 IF YYi = " GOTO 3700 

4270 IF LEN <YY$) < > 4 GOTO 4250 

4280 IF VAL (YYf) < 1753 OR VAL (YYO > 9999 GOTO 4250 

4290 YR$ = YY$:Y = INT ( VAL (YR*>) 

4300 GOSUB 4310: GOTO 3700 
4310 REM *« CALCOLA IL PRIMO DEL MESE 
4320 N( 2) = 28 + <<Y / 4 - INT (Y / 4)) = 0) - «Y / 100 - 
INT (Y / 100)) = 0) * «Y / 400 - INT (Y / 400)) = 

0) 

4330 GOSUB 4360:FM<1) = FM 

4340 FOR I = 2 TO 12:X = (FM(I - 1) + N(I - 1) + .00001) / 

7:FM(I) = INT (7 * (X - INT <X))): NEXT 

4350 RETURN 

4360 REM «««LEGGE DELLA CONGRUENZA DI ZELLER*»* 

4370 CN = INT (Y / 100): IF RIGHT4 ( STR$ <Y),2) = '00' T 
HEN CN = CN - 1 

4380 D = (Y - (100 * CN)) - 1: IF D = - 1 THEN D = 99 
4390 K = 1 
4400 M = 11 

4410 X = ( INT (2.6 * M - ,2) « K « D * INT (D / 4) + INT 
(CN / 4) - (2 * CN)) / 7 
4420 G = ABS (X - INT (X)) 

4430 FM = INT (7 » G « .00001) 

4440 RETURN 

4450 REM ** ROUTINE PER IL DUMP DELLO SCHERMO 
4460 GOTO 4480 

4470 FOR J = I TO I + 39:A = PEEK (J):A = A * (A ( 32) * 1 
92:A = A + (A < 64) * 128:A = A + (A < 96) » 64:A = A 
« (A < 128) * 64:A = A + (A < 160) * 64: PRINT CHR$ ( 
A) : : NEXT J: PRINT CHR$ (13):: RETURN 
4480 PRINT CHRi (4)'PR(tl': PRINT CHRi <9)'80N' 

4490 FOR I = 1024 TO 1920 STEP 128: GOSUB 4470: NEXT 1 

4500 FOR I = 1064 TO 1960 STEP 128: GOSUB 4470: NEXT ! 

4510 FOR I = 1104 TO 1616 - 384 * (NR ( 6) STEP 128: GOSUB 

4470: NEXT I 

4520 PRINT CHR$ (4)'PR»0* 

4530 RETURN 


intrappolato l’errore (linea 4220). 
Questa tecnica può essere incorporata 
nei programmi che utilizzano la proce¬ 
dura di selezione sul menù a cursore 
inverso. È breve, rapida e di sicuro 
impiego. 

Personalizzazione 

Per lo più le stampanti non hanno 
codici identici per fare le stesse cose. I 
codici di controllo della stampante del 
programma Memodesk sono previsti 
per rimagewriter e DMP, e si trovano 
nelle linee 1910 e 1920. Se la stampan¬ 
te della quale disponete non è in grado 
di eseguire l’interlinea a rovescio e la 
sottolineatura, cancellate dal pro¬ 
gramma queste linee più la linea 1900. 
Durante la stampa queste linee sottoli¬ 


neano la data deH’avvenimento sotto il 
controllo della routine di visualizza¬ 
zione del mese. 

Se la stampante a disposizione è in 
grado di sottolineare e di invertire l’in¬ 
terlinea, potete approfittare, volendo, 
di questa caratteristica cambiando i 
codici come occorre per adattarli alla 
vostra stampante. A linea 1920 il codi¬ 
ce per avviare la sottolineatura è 
CHR$ (27);CHR$ (88). Cambiate 
questo codice facendolo corrisponde¬ 
re a quello della vostra stampante per 
l’avvio della sottolineatura. A linea 
1910 il codice per metter fine alla sot¬ 
tolineatura è CHR$ (27);CHR$ (89). 
Potete cambiare anche questo codice 
secondo le esigenze. Ugualmente a li¬ 
nea 1920 il codice per invertire l’inter¬ 
linea è CHR$ (27);CHR$ (114). Il co¬ 


dice per l’interlinea in avanti è CHR$ 
(27);CHR$ (102). 

Altre modifiche 

L’anno di default è il 1985. Potete 
cambiare provvisoriamente l’anno uti¬ 
lizzando l’opzione Visualizzare/Cam¬ 
biare Anno, ma per cambiare il de¬ 
fault dovete cambiare il valore di Y a 
linea 20. 

Infine, può esservi di aiuto per altre 
modifiche la Tavola delle variabili, che 
contiene una descrizione delle corri¬ 
spondenti funzioni. 

Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 

- ¥ 

® 1985 by Nibble e Applicando 
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POCHE URE 



Le stampanti MT/85, a 80 colonne, e MT/86, a 136 
colonne, rappresentano una nuova frontiera nel 
settore delle stampanti a basso costo. 

Basso costo, ma non bassa qualità e basse 
prestazioni, infatti ecco le credenziali di questi due 
nuovi prodotti. 

Velocità a 180 cps. bidirezionale ottimizzata, NLQ 
a 45 cps., grafiche, possibilità di 8 fonti alternative 
di caratteri e naturalmente la completa 

compatibilità con il PC IBM, 

Il prezzo: il più competitivo del 
mercato in questa fascia di 
prestazioni. 

Naturalmente anche le MT/85/86 
oltre ai trattori hanno anche 
trascinamento a frizione e 
***%gr*wm: consentono pertanto il 

trattamento del foglio singolo. 


r 


"\ 


Tutte . 
le garanzie 
del n. 1 



MANNESMANN 

TALLY 

20094 Corsico (MI) - Via Cadamosto. 3 
Tel. (02) 4502850/855/860/865/870 - Telex 311371 Tally I 
00137 Roma - Via I. Del Lungo. 42 - Tel. (06) 8278458 
10099 San Mauro (TO) - Via Casale, 308 - Tel (011) 8225171 
40050 Monteveglio (BO) - Via Einstein, 5 - Tel. (051) 832508 
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LE PAGINE DEL SOFTWARE E DELL HARDWARE 1985-86 


PROGRAMMI 
HARDWARE Js£ 
E ACCESSORI 




Stai per acquistare un 
personal computer Apple? 

Vorrai sapere che cosa puoi far¬ 
ci. Questo volume è un aiuto indi¬ 
spensabile, una guida ragionata 
e completa di tutti i programmi, 
l’hardware e gli accessori dispo¬ 
nibili in Italia. Prima di fare il tuo 
acquisto non puoi non consultar¬ 
lo, perché solo se avrai a disposi¬ 
zione il programma, o i program¬ 
mi, e le periferiche che ti interes¬ 
sano, la tua scelta non ti lascerà 
deluso. 


Le Pagine del Software e 
dell’Hardware sono un 
supplemento di Applicando, il 
mensile per i personal computer 
Apple. Acquistarle singolarmente 
costa 18.000 lire. Per chi si abbona 
ad Applicando sono in regalo. 


□ Allego assegno non trasferibile di L. intestato a Editronica Srl 

□ Allego ricevuta di versamento di L sul CC postale N 19740208 intestato a Editronica Srl 

Corso Montone 39, 20122 Milano. 

□ Pago fin d'ora con la mia carta di credito Bankamericard N.scadenza. 

Data.Firma. . 


Desidero ricevere, senza aggravio di spese postali. Le Pagine del Software, con la seguente formula (segnare la casella 
di proprio interesse): 

a 18.000 lire per ricevere l'edizione 1985-86 di 

Le pagine del Software e dell'Hardware per Apple 

n 50.000 lire per ricevere 10 numeri di Applicando e in regalo l'edizione 1985-86 di 

Le pagine del Software e dell’Hardware per Apple 

COGNOME E NOME . 

VIA . N . 


Nuova 
edizione 
aggiornata 
e ampliata 

- >■€ 


Hai appena acquistato un 
personal computer Apple? 

Senza questa raccolta di pro¬ 
grammi e le numerosissime se¬ 
gnalazioni di periferiche hardwa¬ 
re e di accessori non potrai mai 
sapere quali e quanti utilizzi po¬ 
trai farne. 


Possiedi già da tempo un 
personal computer Apple? 

Allora non c’è bisogno di dirti 
quanto può essere prezioso que¬ 
sto libro: sai già che il tuo compu¬ 
ter, senza programmi e senza un 
hardware adeguato, è come 
un’auto senza benzina e senza 
le ruote. E poiché non c’è limite 
alla fantasia e all'inventiva, con¬ 
sultando questa guida scoprirai 
utilizzi impensati per il tuo perso¬ 
nal. Utilizzi che ti permetteranno 
nel lavoro, nel tempo libero, nel 
gioco o nello studio, di essere 
sempre il più aggiornato, il più 
organizzato, il più soddisfatto... 


In questa nuovissima edizione 
delle Pagine del Software per 
Apple trovi elencati, con una ap¬ 
profondita descrizione, tutti i pro¬ 
grammi e le periferiche hardware 
disponibili in Italia. 


Ritagliar», compilare e 
spedire a: Editronica Srl, 
Corso Monforte 39, 

20122 Milano. 


ORA ANCHE IN EDICOLA! 































Vi piace puntare al gioco? Siete stanchi però della solita 
roulette? Questa simulazione Hi- Res di una slot machine di 
blackjack, come quelle delle case da gioco di Las Vegas, 
permette di cimentarsi con il computer; è possibile sdoppiare 
le coppie o raddoppiare, e ci sono vincite maggiori per il 
blackjack e per gli special di cinque o sei carte. 


DOS 3.3 
ProDOS 
APPLE //e 
APPLE m 


Rieri ne va plus! 


S ignore e signori, fate il vostro gio¬ 
co. La roulette sta girando, la slot 
machine sta ronzando e l'Apple, ecce¬ 
zionale mazziere di blackjack, dà le 
carte. Non avete che da sedervi alla 
tastiera e vedere quanto siete fortuna¬ 
ti. 

Blackjack simula le slot machine di 
Las Vegas che giocano la stessa partita 
che si fa con le carte. Il programma 
chiede quante monete si vogliono pun¬ 
tare e poi disegna quattro carte sullo 
schermo ad alta risoluzione (figura 1). 

Le due carte del banco appaiono 
sulla riga più alta, quelle del giocatore 
sono nella riga in basso. Il banco chie¬ 
de se si vuole giocare (hit) o stare 
(stand) e dà le carte in conformità con 
le istruzioni. La prima mano spetta a 
voi. 

Una volta che il giocatore sta, il pro¬ 
gramma segue la stessa procedura di 
hit o stand per la mano del banco. 
Scopo del gioco è avvicinarsi il più pos¬ 
sibile a un valore facciale totale di 21, 
senza superarlo. Il gioco comprende la 
possibilità di sdoppiare le coppie, gio¬ 
cando così due mani al posto di una, il 
raddoppio e gli special di cinque e sei 
carte. 

Tutto chiaro, fin qui, per chi già co¬ 
nosce il gioco; se invece non avete fa¬ 
miliarità con le regole del blackjack vi 
potrà essere utile consultare l'apposito 
riquadro. 

L’introduzione 
dei listati 

Per digitare Blackjack inserite il 
programma in Applesoft visibile nel 
listato 1. Prestate attenzione a salvarlo 
prima di farlo girare, dato che il pro¬ 
gramma si riloca. Salvatelo poi con il 
comando: 


In aggiunta dovrete introdurre la ta¬ 
vola delle figure BLACKJ ACK.SH A- 
PE visibile nel listato 2. Inserite il codi¬ 
ce usando il Monitor e salvatelo con il 
comando: 


BSAVE BLACKJACK. 
SHAPE,A$900,L$46F 


Quanto alle figure, ce ne sono venti- 
due. Le prime tredici sono A, 2, 3, 4, 
5, 6, 7, 8, 9, 10, J, Q e K. Le quattro 
figure seguenti sono i grandi simboli di 
cuori, picche, quadri e fiori. Il gioco 
utilizza solo queste diciassette figure, 
ma lo si potrebbe modificare per im¬ 
piegare anche le ultime cinque, cioè i 



SAVE BLACKJACK 
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Listato 1 


io 

20 

30 

40 

50 

<40 

70 


90 

100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

240 

270 

280 

290 

300 


********************** 

* BLACKJACK * 

» 01 JIM FEEHAN * 

» COPYRIGHT (C) 1985 * 

* BY APPLICANDO 4 * 

* MICROSPARC, INC * 

******«»***♦***»»«*» 

PEEK (104) < > 44 THEN 


REM 
REM 
REM 
REM 
REM 
REM 
REM 

IF PEEK (104) < > 44 THEN POKE 16384,0: POKE 104,64: 
POKE 103,1: PRINT CHRt (4)'RUN BLACKJACK" 

REM - INIZIALIZZA GENERATORE NUMERI CASUALI 
J = PEEK (78):J = J ♦ 1: 1F J > 255 THEN J = 255 
FOR I = 1 TO J:NUM = RND (1): NEXT I: POKE 202,J 
PRINT CHRt (4)"BLOAD BLACKJACK.SHAPE,A*900" 

REM - PUNTATORI TAVOLA FIGURE 
TEXT : HOME : POKE 232,0: POKE 233,9: DIM DECK(52),T(2) 
:LOOT = 0 

VTAB 2: HTAB 15: PRINT 'BENVENUTO A": FOR I = 1 TO 1000 
: NEXT : GOTO 1780 
REM - SUBROUT1NES STAMPA 
IF F = 2 THEN 230 
GOTO 270 

IF F = 2 THEN 210 
GOTO 250 

IF U = 1 THEN PRINT 'LA TUA PRlftt MMO PERDE 1 MONETA. 
■: RETURN 

PRINT 'LA TUA PRIMA MENO PERDE ';U;' MONETE.': RETURN 
IF U = 1 THEN PRINT 'LA TUA PRIMA MANO VINCE 1 MONETA. 
': RETURN 

PRINT 'LA TUA PRIMA fWO VINCE MONETE.';: RETURN 
IF W = 1 THEN PRINT 'PERDI 1 MONETA.': RETURN 
PRINT "PERDI ';U;' MONETE.': RETURN 
IF U = 1 THEN PRINT 'VINCI 1 MONETA.': RETURN 
PRINT 'VINCI ";U:' MONETE.': RETURN 
IF U = 1 THEN PRINT 'LA TUA SECONDA MANO PERDE 1 MONET 
A.': RETURN 

PRINT 'LA TUA SECONDA NNO PERDE ';U;' MONETE.': RETURN 

310 IF U = 1 THEN PRINT 'LA TUA SECONDA MMO VINCE 1 MONET 
A.': RETURN 

320 PRINT 'LA TUA SECONDA MANO VINCE ';U;' MONETE.': RETURN 

330 VTAB 23: HTAB 1: PRINT 'TUA VINCITA NETTA = 'jLOOT;' MO 
NETE.": RETURN 

340 VTAB 24: PRINT 'PREMI UN TASTO PER CONTINUARE <ESC=FINE 
) ";: GET Ut: IF ASC (Ut) = 27 THEN POP : GOTO 1980 
350 RETURN 

340 REM - TROVA IL SEME PER LA ROUTINE DISEGNO 
370 SUIT = 4: IF DECK(A) < 40 THEN SU1T = 3: IF DECK(A) < 2 
7 THEN SUIT = 2: IF DECK(A) < 14 THEN SUIT = 1 
380 RETURN 

390 REM - PULISCE SCHERMO HI-RES 

400 POKE 230,32: HCOLOR= 0: HPLOT 0,0: CALL 62454 

410 REM - MESCOLA IL MAZZO DELLE CARTE 

420 FOR 1 = 1 TO 52:DECK(1) = I; NEXT 

430 FOR J = 1 TO 52:1 = INT ( RND (1) « 52 ( 1) 

440 K = DECK(J):DECK(J) = DECK<I ) :DECK<I) = K: NEXT 
450 REM - DISEGNA LE PRIME 4 CARTE 
440 HOME : HGR : R0T= 0: SCALE= 1: HCOLOR= 7: HPLOT 0,0: CA 
LL 42454: HCOLOR= 0 

470 DECK(51) = DECK(l):DECK(52) = DECK(2):DECK(50) = DECK(3 

) 

480 A = 1:C = 1: GOSUB 370: GOSUB 2010:A = 2 
490 FOR I = 1 TO 250: NEXT 
500 GOSUB 370:C = 2: GOSUB 2010:A = 3 
510 FOR I = 1 TO 250: NEXT 

520 GOSUB 370: IF SUIT = 2 THEN DECK<3) = DECK(3) - 13 
530 IF SUIT = 3 THEN DECK(3) = DECK(3) - 26 

540 IF SUIT = 4 THEN DECK<3) = DECK(3) - 39 

550 HPLOT 1,0 TO 51,0 TO 51,71 TO 1,71 TO 1,0 
540 FOR I = 2 TO 50 STEP 5: HPLOT 1,0 TO 1,71: NEXT 

570 FOR I = 1 TO 70 STEP 5: HPLOT 1,1 TO 51,1: NEXT 

580 HCOLOR= 5: FOR I = 5 TO 50 STEP 5: HPLOT 1,0 TO 1,71: N 
EXT 

590 FOR 1 = 5 TO 70 STEP 5: HPLOT 1,1 TO 51,1: NEXT : HCOLO 
R= 0 

600 FOR I = 1 TO 250: NEXT 

610 A = 4: GOSUB 370:C = 2: GOSUB 2100:A = 5 

420 REM - CONTROLLA SE BLACKJACK BMCO 

630 FOR 1 = 21 TO 24:DECK(I) = 0: NEXT 

640 IF DECK(3) > 10 THEN DECK<3) = 10 

650 IF DECK(4) > 10 THEN DECK(4> = 10 

660 IF DECK(3) ♦ DECK(4) = 11 AND DECK(3) = 1 THEN 2230 

670 IF DECK(3) * DECK<4> = 11 AND DECK(4) = 1 THEN 2230 

680 REM - CONTROLLA SE POSSIBILE SDOPPIARE 

490 IF DECK(l) < > DECK<2) THEN 0ECK(21) = DECK(l):DECK(22 


) = DECK(2):Fi = 'N': GOTO 780 

700 IF DECK(l) = DECK(2) THEN VTAB 23: PRINT 'VUOI SDOPPIA 
RE QUESTE CARTE (S/N) 7 ';: GET Fi: IF Fi = 'N‘ THEN DEC 
K(21 ) = DECK(l):DECK(22) = DECK(2): GOTO 950 
710 IF FI < ) 'S' THEN 700 
720 REM - CANCELLA LA SECONDA CARTA 
730 HC0L0R= 7: FOR I = 57 TO 107: HPLOT 1,80 TO 1,151: NEXT 

740 FOR I = 1 TO 250: NEXT 

750 REM - DISEGNA LA NUOVA SECONDA CARTA 

760 C = 2:A = 5: HCOLOR= 0: GOSUB 370: GOSUB 2010:DECK(21) 

= DECK(l):DECK(22) = DECK(5) 

770 REM - IMPOSTA FIGURE A 10 
780 IF DECK(21) ) 10 THEN DECK(21) = 10 

790 IF DECK(22) > 10 THEN DECK(22) = 10 

800 IF DECK(23) ) IO THBI DECK(23) = 10 

810 IF DECKX24) > 10 THEN DECKX24) = 10 

820 IF DECK(25) ) 10 THEN DECK(25) = 10 

830 IF DECKK26) > 10 THEN DECK(24) = 10 

840 !F DECK(52) = 99 THEN 2310 

850 REM - CONTROLLA SE BLACKJACK DEL GIOCATORE 
860 IF DECK(21) * DECKX22) < > 11 OR DECK<23) > 0 THEN 950 

870 IF DECK<21 ) = 1 OR DECK<22) = 1 THEN HOME : VTAB 21: I 

fWERSE : HTAB 13: PRINT 'BLACKJACK II": NORMAL : GOTO 
930 

880 REM - TOTALE PRIME DUE CARTE 11 
890 IF F = 1 AND Fi = 'N' THEN VTAB 22: HTAB 1: PRINT 'VUO 
I RADDOPPIARE (S/N)? ';: GET Ut: IF Ut ( > 'S' AND Ut 
< > ’N' THEN 890 
900 IF Ut = 'S' THEN 2300 
910 GOTO 950 

920 REM - VINCITA BLACKJACK 

930 PRINT 'VINCI ':U * 4;' MONETE.':LOOT = LOOT 4 (U » 4): 
GOSUB 330: GOSUB 340:T(F) = - 1:T(0) = 0: HOME : GOTO 
1080 

940 REM - COMINCIA ROUTINE PRINCIPALE - TOTALE CARTE DIST 
RIBUITE FINO AD ORA 

950 T(F) = DECK(21) 4 DECK(22) 4 DECK(23) ♦ DECKC24) 4 OECK 
(25) * DECK!26): IF T(F) > 21 THEN 1030 
960 REM - CONTROLLA SE ASSI 

970 T(0) = 0: FOR I = 21 TO 24: IF DECK(I) = 1 THEN T<0) = 

T(0) 4 1 
980 NEXT I 

990 IF T(F) ( 22 THEN HOME : VTAB 21: PRINT 'IL TUO TOTALE 
E' 1 :T(F) ; 

1000 IF T(0) > 0 AND T(F) + 10 < 22 THEN T(F) = T(F) 4 10: 

PRINT ' 0 ' ;T(F) 

1010 GOSUB 330 

1020 IF T(F) < 22 THEN 1250 

1030 LOOT = LOOT - U 

1040 HOME : VTAB 21: INVERSE : PRINT 'SBALLATO !!!':: NORMA 
L : HTAB 14: PRINT T(F); : INVERSE : HTAB 20: PRINT 'SB 
ALLATO !!!': NORMAL 
1050 GOSUB 190: GOSUB 330 
1060 T(F) = - 1: GOSUB 340: HOME 
1070 REM - CONTROLLA PER LO SDOPPIAMENTO ' 

1080 IF F = 1 AND Fi = 'N' THEN 1900 

1090 IF T(l) = - 1 AND T(2) = - 1 THEN HOME : GOTO 1900 

1100 IF F = 2 AND T<!) > 0 THEN 1440 

1110 REM - CANCELLA PRIMA MANO DELLO SDOPPIAMENTO 
1120 HCOLOR= 7: FOR I = 80 TO 151: HPLOT 0,1 TO 275,1: NEXT 
: HCOLOR= 0 

1130 REM - DISEGNA LA SECONDA NWO 
1140 C = 1:DECK(29) = A:A = 52:F = 2:Ft = 'N': GOSUB 370: G 
OSUB 2010:A = DECK(29) 4 l 

1150 GOSUB 370: IF SUIT = 2 THEN DECK(3) = DECK<3> - 13 
1140 IF SUIT = 3 THEN DECK(3) = DECK(3) - 26 

1170 IF SUIT = 4 THEN DECK<3) = DECK(3) - 39 

1180 FOR I = 1 TO 250: NEXT :C = 2: GOSUB 2010 

1190 REM - CANCELLAZIONE TOTALE DELLA PRIMA MANO 

1200 DECK(2I) = DECK(52):DECK(22) = DECK(A):DECK(23) = 0:DE 
CK(24) = 0:DECK(25) = 0:DECK(24) = 0 
1210 REM - TOTALE PER LA SECONDA MANO 
1220 T(F) = DECK!21) 4 DECK(22) 4 DECK(23) 4 DECK(24) 4 DEC 
K<25) 4 DECK(24) 

1230 GOTO 780 

1240 REM - RITORNA QUI DOPO IL DISEGNO DI CIASCUNA CARTA 
1250 Ut = 'S': IF C ( >6 THEN VTAB 24: HTAB 1: IMMERSE : 

PRINT ' GIOCHI 0 PASSI (G/P)? ';: GET Ut: NORMAL 
1260 IF Ut = ’P' THEN 1310 
1270 IF Ut < > 'G' THEN 1250 
1280 REM - DISEGNA LA CARTA GIOCATA 
1290 C = C 4 1;A = A 4 1; GOSUB 370: GOSUB 2010:DECK(20 4 C 
) = DECK(A): GOTO 780 

1300 REM - CONTROLLA SE LE CARTE SOTTO IL 21 SONO 5 0 6 

1310 IF C < > 6 AND C < ) 5 THEN 1400 

1320 HOME : IF C = 4 THEN LOOT = LOOT 4 (U » 10) 

1330 IF C = 5 THEN LOOT = LOOT 4 <U * 5) 

1340 VTAB 21: IMMERSE : PRINT 'HAI ';C;' CARTE E SOLO *;T(F 

(continua) 
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piccoli simboli di cuori, picche, quadri 
e fiori e il numero 1. Esse sono state 
incluse per rendere la tavola delle figu¬ 
re abbastanza versatile da poter essere 
utilizzata con altri giochi di carte. 

Il programma 

Il programma comincia ricaricando¬ 
si sopra la pagina uno della Hi—Res. 
Poi inizializza il generatore di numeri 
casuali dell’Applesoft. La linea 120 ca¬ 
rica la tavola delle figure a $900. La 
linea 140 dà all’Applesoft l’indirizzo 
della tavola delle figure e poi dimen¬ 
siona con DIM le due matrici chiave 
del gioco, DECK (T) e T (). T tiene 
nota del valore totale delle mani in 
gioco. DECK (in inglese mazzo di car¬ 
te) contiene i valori iniziali delle carte 
ed è utilizzata per immagazzinare i va¬ 
lori durante il gioco. 

DECK è una matrice di 52 elementi 
(carte), ma in ogni giro non ne vengo¬ 
no utilizzate più di 17, ed è quindi 
logico adoperare gli altri elementi per 
immagazzinare altri valori secondo 
necessità. Questo tiene basso il nume¬ 
ro delle variabili e accelera il program¬ 
ma. Significa però che DECK dev’es¬ 
sere rinnovata all’inizio di ciascuna 
mano, passando per la routine che me¬ 
scola le carte. Le macchine di Las Ve¬ 
gas fanno lo stesso, per scongiurare 
l’uso di sofisticati metodi di conteggio 
da parte dei giocatori. 

Le linee 160— 380 sono subroutine. 
Le linee 160—350 provvedono a quasi 
tutta la stampa. Le linee 250—260 mo¬ 
strano come aggirare il problema della 
stampa di una riga con errori di gram¬ 
matica. Altre importanti routine com¬ 
prendono quella che mescola le carte 
(linee 410—440), quella delle vincite 
(linee 1670-1760) e quella che dise¬ 
gna le carte (linee 2000-2210). 

Il corpo principale del programma 
comincia a linea 450, dove sono dise¬ 
gnate le prime quattro carte. I black- 
jack, gli split e i raddoppi soo indivi¬ 
duati nelle linee 620—910. Il giocatore 
tira o sta nelle linee 1240—1420 e poi il 
banco gioca nelle linee 1430—1660. 

Il tasto <ESC> può essere usato in 
due punti (linee 340 e 1900) per uscire 
dal programma ogni volta che viene 
visualizzato il messaggio "PREMI UN 
TASTO PER CONTINUARE" o 
quello "QUANTE MONETE PUNTI 
(1—5)?" Se vi accade di uscire acciden¬ 
talmente dal programma rispondete N 
alla domanda "SEI SICURO DI VO¬ 
LER SMETTERE?", e il gioco ripren¬ 
derà senza perdere il conto del punteg¬ 
gio. 
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Figura 1,2 e 3: vincere a Blackjack non è affatto impossibile. In tutti e tre gli 
esempi la partita è stata persa dal computer. 
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):’ PUNTI.’ 

1350 IF C = 5 THEN PRINT 'HAI VINTO ";W « 5;’ MONETE 1 !*: 
N0RMAL 

1340 1F C = 6 THEN PRINT 'HAI VINTO ’:U * IO:’ MONETE"’: 
NORMAL 

1370 GOSUB 330 

1380 TIFI = 0:T(0) = 0: GOSUB 340: HOME : GOTO 1080 

1390 REM - AGGIUNGE DIECI SE C'E' UN ASSO 

1400 IF T(0) > 1 ANO T(F) 4 10 < 22 THEN T(F) = T(F) 4 10 

1410 IF FI = ’N’ THEN 1440 

1420 GOTO 1120 

1430 REM - GIOCA IL BANCO - DISEGNA CARTA COPERTA 
1440 C = 1 : HCOLOR= 7: FOR I = 0 TO 51: HPLOT 1,0 TO 1,71: 

NEXT : HCOLOR= 0:DECK(3) = DECKI50) 

1450 DECKI29) = A:A = 3: GOSUB 370: GOSUB 2100:A = DECK(29) 
:C = 2 

1440 DECKI21) = DECKI3):DECK<22) = DECK(4):0ECK(23) = 0:DEC 
K(24) = 0:DECK!25) = 0:DECK(24) = 0 
1470 FOR I = 21 TO 24: IF DECK(I) > IO THEN DECK(I) = 10 
1480 NEXT I 

1490 FOR I = 21 TO 24: IF DECK(I) = 1 THEN OECK(O) = DECK(0 
) 4 1 
1500 NEXT 

1510 REM - RICEVE IL TOTALE DEL BANCO 
1520 T(0) = DECKI21) 4 DECKC22) 4 DECKI23) 4 DECKI24) 4 DEC 
K(25) 4 DECKI24): IF T(0) > 21 THEN 1440 
1530 IF C = 5 AND T(0) < 22 THEN HOME : VTAB 21: PRINT ’IL 
BANCO HA CINQUE CARTE SOTTO 22’: GOSUB 190:LOOT = LOO 
T - U: GOSUB 330: GOSUB 340: IF F = 1 THEN HOME : GOT 
0 1900 

1540 IF C = 5 AND T(O) < 22 AND F = 2 THEN HOME : VTAB 22: 
HTAB 1: GOSUB 290:LOOT = LOOT - U: GOSUB 330: GOSUB 3 
40: HOME : GOTO 1900 

1550 IF T(O) < 22 THEN HOME : VTAB 21: PRINT ’IL TOTALE DE 
L BANCO E' ’ ;T<0) ; 

1540 IF DECK(O) ) 0 AND T(O) 4 10 < 22 THEN T(0) = T(O) 4 1 
0: PRINT " OR ’:T(0) 

1570 IF F = 2 AND T<2) = - 1 THEN VTAB 22: HTAB 1: PRINT 
■IL TOTALE DELLA TUA PRIMA NANO ERA ’:T(1): GOSUB 330: 
GOSUB 340: GOTO 1400 

1580 VTAB 22: HTAB 1: PRINT "IL TUO TOTALE E' ’;T(F): GOSUB 
330: GOSUB 340 

1590 REM - IL BANCO GIOCA LA CARTA 

1400 IF T(O) < 14 THEN C = C 4 l:A = A 4 li GOSUB 370: GOSU 


B 2100 :DECKC20 4 C) = DECK(A): GOTO 1470 
1410 IF T(0) < T(l) AND T(0) < T(2) THEN T(0) = 15: GOTO 14 


1420 

1430 

1440 

1450 

1440 

1470 

1480 


1490 

1700 

1710 


1720 


1730 


1740 


1750 


1740 

1770 

1780 


1790 


1800 

1810 


IF T(0) > T<1) AND T(0) > T<2) THEN 1480 

IF (T(0) ) = T(l) AND TU) < > - 1) OR (T(O) > = T 

(2) AND T(2) ) 0) THEN 1480 

IF T(0> < TU) THEN T(0> = 15: GOTO 1400 

IF T(O) < T(2) THEN T(O) = 15: GOTO 1400 

HOME : VTAB 21: PRINT ’IL BANCO HA ’;T<0);\ HA SBALL 

ATO !!!’ 

REM - ROUTINES VINCITE 

IF T(0) ) 21 AND TU) ) 0 AND TU) < 22 THEN LOOT = LO 
OT + W: VTAB 22: GOSUB 170: GOSUB 330: GOSUB 340: HOME 
: IF T(2) = 0 THEN TEXT : GOTO 1900 
IF T(0) > 21 AND T(2) > 0 AND T<2) < 22 THEN LOOT = LO 
OT 4 U: VTAB 22: HTAB 1: GOSUB 310: GOSUB 330 
IF T(0) > 21 THEN 1740 

IF T(O) > = TU) AND TU) ) 0 THEN LOOT = LOOT - W: H 
OHE : VTAB 21: PRINT ’IL BANCO VINCE.’: GOSUB 190: GOS 
U8 330: IF T(2) ) 0 THEN GOSUB 340 
IF T(0) < TU) AND TU) > 0 THEN LOOT = LOOT 4 U; VTAB 
22: PRINT ’LA TUA PRIMA MANO BATTE IL BANCO.’: GOSUB 
170: GOSUB 330 

IF T(0) > = T<2) WD T(2) > 0 THEN LOOT = LOOT - W: H 
OME : VTAB 21: PRINT "IL BANCO BATTE LA TUA SECONDA MA 
NO.’: GOSUB 250: GOSUB 330 

IF TU) > 0 AND TU) ) T(0) THEN LOOT = LOOT 4 U: HOME 

: VTAB 22: PRINT "IL TUO TOTALE BATTE IL BANCO.’: GOS 

UB 170: GOSUB 330: IF T<2) > 0 THEN GOSUB 340 
IF T(2) > 0 AND T(2) > T(0> THEN LOOT = LOOT 4 U; HOME 

: VTAB 22: PRINT "LA TUA SECONDA MANO BATTE IL BANCO. 

’: GOSUB 270: GOSUB 330 
GOSUB 340: TEXT : HOME : GOTO 1900 
REM - ROUTINE INIZIALE DI STAMPA 
HOME : VTAB 4: HTAB 11: INVERSE : PRINT "B L A C K J A 
C K’: NORMAL : VTAB 1: PRINT ’* (0 1985 BY APPLICANO 
0 4 MICROSPARC *’ 

VTAB 7: PRINT "PUOI PUNTARE DA 1 A 5 MONETE IN OGNI 144 
-NO. SE SDOPPI, LA TUA POSTA E' AUTOMATI-CAMENTE RADDO 
PPIATA. ’ 

PRINT ’ (PARITÀ') IL BANCO VINCE 1 ! ! ’ 

VTAB 12: PRINT .-.. .- 


1820 VTAé 13: PRINT ’= SPECIAL: 


LE REGOLE DEL BLACKJACK 

Scopo del gioco è fare sì che il totale delle proprie carte batta il totale 
delle carte del banco. In questa versione i punteggi pari, o push, vanno 
al banco. Il giocatore e il banco ricevono due carte ciascuno. Una delle 
carte del banco è data coperta. Ogni carta dal due al dieci ha il suo valore 
facciale; le figure valgono dieci e un asso vale o uno o undici. 

Prima che venga data ogni carta il giocatore può scegliere se tirare una 
carta (hit) o stare (stand). Ogni volta che il giocatore chiede uno hit il 
banco gli dà un’altra carta. Quando ha deciso per lo stand il procedimen¬ 
to viene ripetuto per il banco. Il banco deve tirare a ogni mano che valga 
16 o meno. Con le mani che valgono 17 o più il banco continuerà a 
ricevere carte fino a quando vincerà o supererà 21. Qualsiasi mano che 
superi 21 perde automaticamente. Se si vince si incassa un ammontare 
uguale alla posta. 

Un blackjack è una mano speciale che consiste in un asso e in un dieci 
o una figura. Un blackjack fatto da uno dei due avversari vince automa¬ 
ticamente. Il giocatore che fa blackjack riceve quattro volte la posta. 

Una mano consistente in cinque carte del valore totale di 21 o meno è 
uno special di cinque carte. Vince automaticamente e paga cinque volte 
la posta. Uno special di sei carte paga dieci a uno. 

Se si riceve una coppia (due jack, due assi e via dicendo) si può 
scegliere di sdoppiare la coppia e di giocarla come due mani separate 
contro la stessa mano del banco. Quando si sdoppia la coppia la posta è 
automaticamente raddoppiata (una puntata per ciascuna mano) e si 
prendono le decisioni di hit o stand per una mano alla volta. 

Se si ricevono due carte che in totale fanno esattamente undici si può 
scegliere di raddoppiare. Ciò significa che la posta è raddoppiata e che 
alla carta seguente si deve stare. 


Personalizzazione 

L’aggiunta più semplice e ovvia al 
gioco sarebbe il suono. Mentre una 
lunga ripetizione di bip e clic riesce 
infatti fastidiosa a molti, un po’ di alle¬ 
gro rumore per le grosse vincite po¬ 
trebbe essere ben accetto. 

Le linee 870, 1340— 1350 e 
1680—1750 sono logiche candidate per 
questi effetti sonori. Una serie di 
CALL a —198 potrebbe essere tutto 
ciò che vi occorre. Inoltre potrebbe 
farvi piacere rendere più spettacolare 
con un po’ di suono anche il disegno 
delle carte. Provate a farlo con le linee 
2180, 2190, 2200 e 2210. 

Si possono fare altre semplici modi¬ 
fiche. Per esempio si possono creare, 
volendo, puntate più sostanziose. Il 
programma com’è adesso limita il gio¬ 
catore a un massimo di cinque mone¬ 
te, male linee 1790,1900e 1950 posso¬ 
no essere modificate per cambiare 
questo limite. 

Naturalmente le vincite risulteran¬ 
no maggiorate, ma non è forse quello 
che si va cercando? Nello stesso spirito 
si può cambiare, se si desidera, la re¬ 
gola che permette al banco di vincere 
in caso di push (cioè di parità di pun¬ 
teggio). 
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.1 , 

1830 VTflé 14: PRINT ■=':: HTAB 40: PRINT '=' 

1840 VTAB 15: PRINT '^CINQUE CARTE CON MENO DI 22 PINTI PA- 

=GANO = 5 A 1. SEI CARTE CON UN TOTA- =LE INFERI OR 
E A = 22 PAGANO IO A 1. =■ 

1850 VTAB 18: PRINT "=• ; : HTAB 40: PRINT ■=■ 

1860 VTAB 19: PRINT HTAB 40: PRINT '=' 

1870 VTAB 20: PRINT ■= il 8LACKJACK PAGA 4 A 1. 

— I 

1880 VTAB 21: PRINT .= ...—- 

_ ■ 

1890 REM - INIZIO DI OGNI l¥NO 

1900 VTAB 23: HTAB 1: PRINT 'QUANTE MONETE PUNTI (1-5)?': H 
TAB 24: PRINT '(ESOFINE) VTAB 23: HTAB 36: GET U* 
1910 IF ASC <W$> = 27 THEN 1980 

1920 REM - AZZERA TUTTI I CONTATORI 

1930 A = 0:C = 0:F« = ":SUIT = 0:T(0) = 0:T(1) = 0:T<2) = 
0:U = 0 :DECK(0) = 0 

1940 REM - CONTROLLA PER LA SCOftlESSA 1 A 5 

1950 U = ASC («♦): IF U < 49 OR U ) 53 THEN 1900 

1960 HOME :F = 1:U = U - 48: VTAB 12: HTAB 15: PRINT 'STO M 
ESCOLANOO': GOTO 400 

1970 IF C = 5 AND T(0) < 22 THEN HOME : VTAB 22: PRINT 'IL 
BANCO HA CINQUE CARTE SOTTO IL 22.'; GOSUB 240:L00T = 
LOOT - U: HTAB 20: PRINT ' TUA VINCITA NETTA = ';LOOT 
: GOSUB 340: GOTO 1900 

1980 TEXT : HOME : VTAB 4: PRINT 'SEI SICURO DI VOLER SMETT 

ERE?*; : GET ZS: PRINT : HOME : IF Z* < > 'S' GOTO 190 

0 

1990 END 

2000 REM - ROUTINES DISEGNO PER LE CARTE DEL GIOCATORE 
2010 HCOLOR= 0 

2020 IF C = 1 THEN HPLOT 1,80 TO 51,80 TO 51,151 TO 1,151 
TO 1 ,80:X = 26 :Y = 105 

2030 IF C = 2 THEN HPLOT 57,80 TO 107,80 TO 107,151 TO 57, 
151 TO 57,80:X = 83:Y = 105 

2040 IF C = 3 THEN HPLOT 113,80 TO 163,80 TO 163,151 TO 11 

3.151 TO 113,80:X = 138:Y = 105 

2050 IF C = 4 THEN HPLOT 169,80 TO 219,80 TO 219,151 TO 16 

9.151 TO 169,80:X = 194:Y = 105 

2060 IF C = 5 THEN HPLOT 225,80 TO 275,80 TO 275,15! TO 22 

5.151 TO 225,80:X = 250:Y = 105 

2070 IF C = 6 THEN HPLOT 225.0 TO 275,0 TO 275,71 TO 225,7 
1 TO 225,0:X = 250:Y = 25 


2080 

2090 

2100 

2110 

2120 

2130 

2140 

2150 

2160 

2170 

2180 


2190 


2200 


2210 


2220 

2230 

2240 

2250 

2260 

2270 

2280 

2290 

2300 

2310 

2320 


GOTO 2170 

REM - ROUTINES DISEGNO PER LE CARTE DEL BANCO 
IF C = 2 THEN HPLOT 57,0 TO 107,0 TO 107,71 TO 57,71 
TO 57 0 *X = 82;Y = 25 

IF C = 3 THEN 'HPLOT 113.0 TO 163,0 TO 163,71 TO 113,7 
i Tn 11 q n-v = nfl.Y = 

IF C = 4'THEN HPLOT 169,0 TO 219,0 TO 219,71 TO 169,7 
1 TO 169,0:X = 194:Y = 25 

IF C = 1 THEN HPLOT 1,0 TO 51,0 TO 51,71 TO 1,71 TO 1 
O'X = 26*Y = 25 

Ìf'c = 5 THEN HPLOT 225,0 TO 275,0 TO 275,71 TO 225,7 
1 TO 225,0:X = 250:Y = 25 

IF C = 6 THEN HPLOT 225,80 TO 275,80 TO 275,151 TO 22 

5,151 TO 225,80:X = 250:Y = 105 
REM - DISEGNA SEME E VALORE - X,Y DETERMINANO IL CEN 
TRO DELLA CARTA 

ON SUIT GOTO 2180,2190,2200,2210 
ROT= 32: HCOLOR= 5: DRAU 14 AT X.Y + 20: DRAU DECK(A) 
AT X + 21,Y + 44: ROT= 0; DRAU DÈCK(A) AT X - 21 ,Y - 2 
3: HCOLOR= 0: RETURN 

DRAU 15 AT X,Y:DECK(A) = DECK(A) - 13: ROT= 32: DRAU D 
ECK(A) AT X ♦ 21,Y * 44: ROT= 0: DRAU DECK(A) AT X - 2 
l.Y - 23: RETURN 

HCOLOR= 5: DRAU 16 AT X,Y:DECK(A) = DECK(A) - 26: ROT= 
32: DRAU DECK(A) AT X ♦ 21,Y + 44: ROT= 0: DRAU DECK! 
A) AT X - 21,Y - 23: HCOLOR= 0: RETURN 
DRAU 17 AT X,Y:DECK(A) = DECK(A) - 39: ROT= 32: DRAU D 
ECK(A) AT X + 21 ,Y + 44: ROT= 0: DRAU DECK(A) AT X - 2 
l.Y - 23: RETURN 

REM - ROUTINE BLACKJACK DEL BANCO 
HCOLOR= 7: FOR 1 = 0 TO 51: HPLOT 1,0 TO 1,71: NEXT 
HCOLOR= 0:C = 1:A = 50 
GOSUB 370: GOSUB 2100 

VTAB 21: INVERSE : PRINT 'IL BANCO HA BLACKJACK !!' 
ORMAL :LOOT = LOOT - U 
GOSUB 190: GOSUB 330 
GOSUB 340: TEXT : HOME : GOTO 1900 
REM - ROUTINE RADDOPPIO DEL GIOCATORE 
C = 3:A = 5: GOSUB 370: GOSUB 2010:DECK(23) = DECK<5): 
DECK!52) = 99: GOTO 780 

TU) = DECK(21) + DECK(22) * DECK(23):U = U * 2 
HOME : VTAB 21: PRINT "HAI RADDOPPIATO E DEVI STARE CO 
N QUESTETRE CARTE - IL TUO TOTALE E' 'jTU): GOSUB 330 
: GOSUB 340: HOME : GOTO 1440 
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Applicando a portata di mano 

E' disponibile il raccoglitore di Applicando e gli indici su 
dischetto degli anni 1983/84/85. Ogni raccoglitore 
consente di archiviare le annate 1983 e 1984 insieme 
oppure i numeri del 1985. Ordina subito i tuoi 
raccoglitori: riceverai in omaggio un numero arretrato di 
Applicando a tua scelta (valore L. 7.000) per ogni 
raccoglitore ordinato ( n.b. i numeri 1 e 2 sono esauriti). 





Sì, voglio avere Applicando sempre 
a portata di mano. Inviatemi: 

□ N.raccoglitori per J 

Applicando a L. 18.000 cadauno -L 
In omaggio inviatemi l'arretrato/i s 

N.(1 e 2 esauriti) | 

□ Disco indici 3 

□ per Apple II a L.5.000 

□ per Macintosh a L.10.000 

(utilizzabile con MacWrite) S 

Vi invio L.a mezzo 11 

□ assegno non trasferibile 
allegato intestato a Editronica srl 

□ versamento su ccp N.19740208 
Editronica srl Corso Monforte 39 
20122 Milano di cui allego ricevuta 

Nome... 

Cognome. I 

a> 

Via. t 
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Cap.Prov. 

Città. 
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Le linee 1630 e 1710—1750 possono 
essere facilmente modificate in modo 
da permettere al giocatore di vincere i 
push o di rinunciare interamente alla 
giocata. 


Si potrebbero anche incorporare nel 
gioco le regole personali preferite, per 
esempio una vincita speciale per tre 
sette o per la combinazione 6, 7 e 8. 

A proposito di vincite, in questo 



Figura 4: quando si inizia una nuova partita, compaiono sul video quattro 
carte; le due superiori, una delle quali è coperta, sono del banco. 


gioco sono piuttosto generose, più ge¬ 
nerose di quelle che accordano le vere 
macchine di Las Vegas. I bambini si 
possono scoraggiare presto di fronte 
alla crescita delle perdite (e le perdite 
nel blackjack si fanno sentire) se non si 
accordano loro vincite rilevanti. 
Quanto agli adulti, può darsi che non 
abbiano bisogno di questo incentivo, 
ma può anche darsi di sì... Le vincite 
possono essere ritoccate nelle linee 
930, 1350-1360 e 1680-1750. 

Potreste anche provare una routine 
in linguaggio macchina per cancellare 
le carte più rapidamente di quanto fac¬ 
ciano le linee 730 e 1120. Se scoprite 
che premete i tasti troppo velocemen¬ 
te per poter vedere il messaggio, pote¬ 
te rallentare l’azione mettendo un PO- 
KE —16368,0 davanti a ogni GET del 
programma. Così si pulisce lo strobe di 
tastiera e dovete attendere il prompt 
di input prima di battere la risposta. 


Questo programma è disponibile su 
dischetto. L’elenco, i prezzi e le 
modalità d'ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 
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stx-80 

LA SILENZIOSA 

La più piccola della famiglia. 

Star, grande nel soddisfare 
le vostre esigenze. 

Termica e quindi silenziosissima, con 60 
caratteri al secondo, bidirezionale e 
grafica ti accompagnerà con la sua 
discrezione nei tuoi grandi momenti. 

Stx-80. La più piccola grande stampante amica. 


Star SG-10 
L'ECONOMICA 

Erede della Gemini 10X, la Star più venduta. 
Buon sangue non mente! Le novità ? 

NLQ, IBM PC compatibile da DIP switch, 
spaziatura proporzionale, ancor più veloce. 
Ma una cosa rimane invariata: 
il rapporto prezzo/prestazioni. 
Semplicemente il migliore. 

Star SG-10. Per stampare in economia. 


Star SG-15 

LA PRO-ECONOMICA 

Per non rinunciare all'economia 

mantenendo la qualità. 

136 colonne facili e complete con tutte 
le novità della piccola SG-10. 

16 Kbyte di buffer per aumentare la vostra 
produttività e quella del vostro computer. 
Star SG-15. Qualità e prezzo su 136 colonne. 


Star SD-10 

LA STELLA DELLA QUALITÀ' DI STAMPA 
Selezione dei vari set di caratteri con 
DIP switch facilmente accessibili. 

Dump esadecimale. 

Stampa normale e professionale (NLQ) 2K buffer. 
Thruput migliorato del 20% 
rispetto ai modelli precedenti. 

Star SD-10. Qualità alla portata di tutt> 




Star SD-15 

LA STELLA NELLE LARGHE 
PROFESSIONALI 
Mantiene tutte le caratteristiche 
dell'SD-10 su formato largo. 

160 caratteri al secondo 
ed un buffer di 16 Kbyte. 

SD-15 non vi pianta mai in asso. 
Prestazioni a tutta larghezza. 



Star SR-10 

LA PROFESSIONISTA 
200 caratteri al secondo, near letter, 
quality, selezione dei set di caratteri e 
formati da DIP switch di facile accesso, 
caratteri proporzionali, possibilità di 
programmare 240 caratteri a vostro 
piacimento, caricamento automatico 
di fogli singoli. Fatti che contano. 

Star SR-10. La professionista. 


Star SR-15 

PROFESSIONISTA MULTIFUNZIONALE 
DI LARGO FORMATO 
Il buffer di 16 Kbyte è solo una delle 
tante caratteristiche di completezza della 
macchina più prestigiosa della famiglia 
con tutte le prestazioni della SR-10. 

La nuova qualità nella stampa. 

Star SR-15. La seria professionista. 


Power- Type 

LA PERFEZIONISTA 

La nuova stampante a margherita della Star. 

Power-Type vi dà una corrispondenza 

da professionista. 

Velocità: 18 caratteri al secondo. 

Oltre 100 set di caratteri tra cui scegliere. 
Power-Type. La dattilografa perfetta. 


UFFICI REGIONALI 


PIEMONTE - Torino 

tei. 011 /309.71.73- 30.6 5 .40 

3 VENEZIE Villa Loschi Ziler. 
tei. 0444/57.09.66 - 57.09.87 

EMILIA ROMAGNA Bologna 
tei. 051/50 45.10 

LAZIO - Roma 
tei. 06/339.87.76 

MARCHE - Numana (AN) 
tei. 071/93.68.19 


AGENTI 

LIGURIA - Genova 
Boccardo Roberto 
tei. 010/53.26.83 
TOSCANA - La Spezia 
Fontana Luciano 
tei. 0187/98.80.19 
LAZIO - Roma 
Electroline S.r.l. 
tei. 06/542.03.05 - 542.37.16 
CAMPANIA Napoli 
AEP 

tei. 081/63.00.06 - 62.78.62 


PUGLIE BASILICATA Foggia 
Cavallo Nicola 
tei. 080/33.04.99 
SICILIA - Siracusa 
Tranchino Paolo 
tei. 0931/42.264 


RIVENDITORI 


IES S.p.A - Brescia 
tei. 030/34.45.27 
RT Italiana 

Computer S.r.l. - Milano 
tei. 02/50.35.41/2/3/4 


Informatica Service (MI) 
tei. 02/749.06.92 
F.lli Pinto S.a.s. - Torino 
tei. 011/53.59.57 
Kyber Calcolatori 
S.r.l. - Pistoia 
tei. 0573/36.81.13 
Elettronica Centostelle 
S.r.l. - Firenze 

tei. 055/60.81.07 -61.13.02 
Computerà Tecnology - Corridonia 
tei. 0733/29.25.14 
Linea Informatica S.r.l. - Foligno 
tei. 0742/57.100 
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Due programmi per gli studi dentistici: per archiviare, ricercare ed 
elaborare dati anagrafici, cartelle cliniche, appuntamenti. Analisi 
della situazione contabile e fatturazione, garanzia del segreto 
professionale e salvaguardia della privacy dei pazienti. E, a 
proposito di scientificità, analisi, diagnosi e terapie agevolate dalla 
possibilità di impiego di ben 5 metodiche diverse. 


Il tasto batte 
dove il dente duole 


F inalmente anche per i titolari di 
studi dentistici è disponibile del 
software verticale su misura per le loro 
esigenze. Si tratta di due programmi, 
Dentstar 80 e Dentai check-up, pro¬ 
dotti dalla European Society of Medi¬ 
cai Software, in grado di sovraintende- 
re sia alla gestione amministrativa, fat¬ 
turazione, registrazione delle spese, 
richiamo dei saldi insoluti, eccetera, 
sia alle operazioni mediche, prepara¬ 
zione delle cartelle cliniche, visualiz¬ 
zazione dei problemi dentari dei pa¬ 
zienti. 

Dentstar 80 

È stato progettato per gestire, in 
modo pratico e veloce, studi odontoia¬ 
trici dove lavorino fino a 4 medici con¬ 
temporaneamente. La configurazione 
hardware necessaria per far girare 
questo programma è la seguente: 


Apple //e con scheda 80 colonne 
o Apple Ile. 

Un monitor. 

Due disk drive da 5 pollici e 1/4 
o da 3.5 pollici. 

In alternativa Profile più 1 drive. 
Stampante Apple Image Writer 
con interfaccia Apple SSC. 

A ogni configurazione hardware 
corrisponde una particolare versione 
del programma. Ógni responsabile di 
uno studio potrà scegliere la versione 
che meglio si adatta alle sue esigenze 
in base al volume di lavoro e all'hard- 
ware disponibile. Infatti, dal dispositi¬ 
vo di memoria di massa dipende non 


solo la capacità di archiviazione, ma in 
alcuni casi anche il tipo di soluzione 
operativa. Per quanto riguarda la ca¬ 
pacità, con dischi da 5 pollici e 1/4 
possono essere archiviati fino a 200 
pazienti per disco, con dischi da 3.5 
pollici da 800 K ne possono venire me¬ 
morizzati un massimo di 1400, mentre 
con Profile vengono gestite fino 7500 
cartelle in linea. Da questa prima ana¬ 
lisi può sembrare che esista una gran¬ 
de differenza di prestazioni tra la ver¬ 
sione floppy a quella Profile. In realtà, 
sebbene la capacità dei supporti ester¬ 
ni sia un fattore molto importante, in 
questo particolare caso è possibile ov¬ 
viare a certi svantaggi, organizzando 
l'archivio in maniera da limitare gli 
accessi al materiale meno attuale. Una 
tecnica può essere ad esempio quella 
di dividere i dischetti secondo l’ordine 
alfabetico e quindi di eseguire una pri¬ 
ma selezione, per così dire, manual¬ 
mente e di raggruppare in unico disco 
tutti i pazienti attivi in quel periodo, 
che sono normalmente meno di quanti 
possono essere contenuti in un floppy. 


La filosofia con cui è stato progetta¬ 
to Dentstar 80, privilegia senza dubbio 
la qualità e la completezza, nella defi¬ 
nizione della cartella clinica dei pa¬ 
zienti, piuttosto che la quantità di pa¬ 
zienti memorizzabili, questo perché il 
programma non vuole essere un data¬ 
base di dati anagrafici più una succinta 
appendice medica, ma soprattutto un 
valido supporto operativo proprio ne¬ 
gli aspetti tecnicamente più specialisti¬ 
ci. Inoltre, a testimonianza del fatto 
che si tratta di un software diretto al¬ 
l’utente finale, in questo caso addirit¬ 
tura al medico stesso, il programma 
non prevede nessun tipo di codifica: 
ogni informazione viene introdotta 
nella sua forma più naturale, opera¬ 
zioni come la devitalizzazione o la gut- 
tuperca di un dente non devono essere 
siglate in alcun modo, il medico quindi 
non è costretto a imparare una nuova 
terminologia per comunicare con il 
computer. 

La cartella clinica del paziente è 
strutturata in modo da consentire l'in¬ 
troduzione di dati secondo un modello 


FOGLIO 1 


FOGLIO 2 

1 - Immissione dati nuovo Daziente 


1 - Richiamo saldi insoluti 

2 - Ricerca - Aggiornamento 


2 - Correzione fatture 

3 - Fatturazione 


3 - Dettagli incassi-prestazioni 

4 - Elenco clienti 


4 - Dettagli spese 

5 - Appuntamenti 


5 - Correzione spese 

d - Reoistrazione spese 


6 - Evidenziazione fatturato 

7 - Recupero cartelle vuote 


7 - Programmazione voci spese 


Figura 1 : le tre pagine in cui è diviso il menù del programma Dentstar 80. 
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Figura 2: la cartella clinica su video realizzato da 
Dentstar. 


prefissato, tuttavia 5 delle 14 voci che 
la compongono sono programmabili 
secondo le specifiche necessità, con¬ 
sentendo una buona personalizzazio¬ 
ne. In ogni tabulato è previsto abba¬ 
stanza spazio per annotare fino a 50 
sedute per ciclo di cura, sia dal punto 
di vista medico che contabile. Dal 
punto di vista clinico la situazione del 
paziente può essere seguita grazie a un 
esclusivo schema grafico (EMS) che 
consente di visualizzare i problemi 
dentari su una simulazione di ortopan- 
tomografia. Un’altro particolare inte¬ 
ressante di Dentstar 80: consente per¬ 
fino di salvaguardare il segreto profes¬ 
sionale creando un archivio compieta- 
mente indipendente su un file protetto 
da una chiave di accesso che solo l’o¬ 
peratore conosce. In questo modo tut¬ 
ti i pazienti che esigono la riservatezza 
della propria condizione sono protetti 
da sguardi indiscreti. Il menù principa¬ 
le permette di scegliere tra ben 21 op¬ 
zioni diverse, raggruppate in tre fogli 
parzialmente sovraposti e selezionabi¬ 
li. Andiamo ora a esaminare più detta¬ 


gliatamente alcuni aspetti particolari: 
•La fatturazione può essere automati¬ 
ca, semiautomatica o manuale (con 
Profile e dischi da 3.5 pollici è imple¬ 
mentata solo quella manuale). Nel pri¬ 
mo caso il programma estrae dall’ar¬ 
chivio tutti i pazienti che hanno versa¬ 
to un acconto e procede autonoma¬ 
mente alla fatturazione. Nel secondo, 
il computer attende conferma prima di 
stampare la fattura. Nel terzo caso in¬ 
vece, il calcolatore si limita a estrarre 
dall'archivio i dati anagrafici, atten¬ 
dendo che l’operatore introduca gli 
importi corrispondenti. Tutte le fattu¬ 
re emesse vengono registrate e presen¬ 
tate, quando richiesto, raggruppate 
per mese o per anno, con relativo 
totale. 

• Recupero dei saldi insoluti. A questo 
scopo Dentstar 80 è in grado di scova¬ 
re i pazienti più "distratti" e costringer¬ 
li a saldare il dovuto. Procede ese¬ 
guendo una ricerca nell’archivio pa¬ 
zienti (tra quelli in cura in quel perio¬ 
do) estraendo tutti i nominativi che 
hanno un saldo insoluto superiore o 
uguale alla cifra specificata. Se il tem¬ 
po trascorso dall’ultima visita effettua¬ 
ta è maggiore di due mesi, viene stam¬ 
pata una lettera di sollecito. 


•Appuntamenti. Ogni medico ha a di¬ 
sposizione un archivio appuntamenti 
autonomo. La durata minima di ogni 
seduta è di 30 minuti. Per consultare 
l’agenda degli impegni, per ricercare 
un buco libero dove infilare un pazien¬ 
te urgente o semplicemente per pro¬ 
grammare gli impegni della giornata, è 
possibile scorrere l'archivio appunta¬ 
menti, selezionare la settimana desi¬ 
derata caricarla in memoria ed esami¬ 
narla in dettaglio. 

•Registrazione spese. Come tutte le 
attività economiche anche questa ha 
delle spese, da qui la necessità memo¬ 
rizzarle organicamente per utilizzarle 
in fase di bilancio. Possono essere me¬ 
morizzate fino a 300 spese ogni mese, 
inserendole man mano che vengono 
effettuate o anche casualmente e alla 
rinfusa. Penserà il programma a ordi¬ 
narle, suddividendole per periodi e 
per genere. Inoltre, per chi ha proble¬ 
mi di personale, Dentstar 80 è in grado 
di individuare e selezionare tutte le 
prestazioni fornite dai medici che ope¬ 
rano nello studio. 

• Bilanci. È possibile esaminare la si¬ 
tuazione contabile in ogni dettaglio e 
ottenere in tempo reale: incassi, spese 
bilanci, in forma riepilogativa, mese 


Figura 3: Dentai check-up consente l’elaborazione 
sullo schermo direttamente dalla lastra. 


FOGLIO 3 

1 - Stampa cartelle del giorno 

2 - Cancellazione cartella 

3 - Preventiwazione 

4 - Lettere visite periodiche 

5 - Modifica data sistema 

i - Programmazione voci cartella 


■ 
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Figura 4: situazione 
contabile, grafici di 
andamento ed 
elenchi operativi 
sono alcune opzioni 
implementate in 
Denstar80. 



per mese, medico per medico. Inoltre 
possono essere esaminate tutte le spe¬ 
se di un determinato periodo, rag¬ 
gruppate in categorie: materiale ra¬ 
diografico, materiale di consumo, af¬ 
fitto, riscaldamento, paghe, luce, ec¬ 
cetera. 

•Consente di estrarre dall’archivio dei 
pazienti attivi tutte le cartelle che co¬ 
stituiscono l’elenco operativo princi¬ 
pale, cioè tutti i pazienti che hanno 
appuntamento in un dato giorno. Infi¬ 
ne, è possibile estrarre tutti i nominati¬ 
vi dei pazienti che da oltre sei mesi non 
si sono più visti. Penserà Dentstar 80 a 
preparare una lettera, con i dati ana¬ 
grafici del paziente, per ricordargli di 
sottoporsi a una visita periodica di 
controllo. 

•Nel programma è implementato un 
calendario perpetuo e la data del gior¬ 
no viene fornita all’accensione del si¬ 
stema. 

Dentstar 80 costa nella versione da 5 
pollici e 1/4 595.000 lire, in quella da 
3.5 pollici 696.000 lire e per Profile 
996.000 lire. Tutti i prezzi sono iva 
esclusa. 


Dentai check-up 

A differenza di Dentstar 80 si prefigu¬ 
ra come un programma essenzialmen¬ 
te scientifico, studiato appositamente 
per l’automazione di analisi cefalome¬ 
triche. Il programma è costituito da 5 
package differenti, acquistabili anche 
separatamente; è visibile qui sotto il 
menù generale, che comprende tutte 
le opzioni dei 5 package: 

1 Archivio pazienti. Consente l’archi¬ 
viazione sia dei dati clinici generali del 
paziente, sia delle indicazioni anagra¬ 
fiche. Consente un ordinamento alfa¬ 
betico e due chiavi di ricerca. 

2 Data entry. Consente l’introduzione 
dei dati necessari da tastiera e da tavo¬ 
letta grafica direttamente dalla radio¬ 
grafia L—L di tipo classico. 

3 Tweed/Steiner. Prevede un output 
dei dati su video e su stampante, con 
possibilità di costruire dei grafici su 


plotter per profondità o per altezza. 

4 Coben. Output su video e stampan¬ 
te. 

5 Sovrapposizioni Tweed. L’output 
dei dati ricalca quella delle analisi di 
Tweed/Steiner e di Coben, inoltre pre¬ 
vede le sovrapposizioni superiore, in¬ 
feriore e totale. 

6 Arco individuale. Consente la co¬ 
struzione automatica del’arco indivi¬ 
duale su plotter. 

7 Ricketts. Analisi con dati su video e 
stampante e grafici su plotter. 

Ogni package comprende l’analisi 
secondo l’autore prescelto, la costru¬ 
zione dell’arco ideale su plotter, il pro¬ 
gramma per l'introduzione dei dati, 
quello per l’archiviazione e per il 
back-up dei dischi dati. Tutte le in¬ 
formazioni sono condivisibili tra le 
analisi dei vari autori, a eccezione del 
metodo di Ricketts che è compieta- 
mente autonomo. 

La configurazione hardware neces¬ 
saria è la seguente: 


Apple // plus o //e. 

Due disk drive. 

Stampante per Apple seriale 
o parallela. 

Tavoletta grafica Houston DT11A. 
Plotter (opzionale) Houston DMP3 o 
DMP4 oppure Apple Color Plotter. 


Ecco le caratteristiche salienti del pro¬ 
gramma. Con Dentai Check-up, per 
mezzo di una rapida sezione di intro¬ 
duzione dati, da tastiera e da tavola 
grafica, e avvalendosi dei modelli e di 
una teleradiografia classica L—L, il 
medico dispone di ben 5 metodiche 
diverse per l’analisi dei problemi den¬ 
tari del paziente in esame: metodo di 
Tweed, Steiner, Coben, Ricketts, so¬ 
vrapposizioni e costruzioni dell’arco 
individuale. 

Il programma chiede all’utente di 
inserire notizie di carattere generale 
circa il paziente in esame: cognome e 
nome, indirizzo, telefono, eventuali 
note e sesso. Quindi l’operatore deve 
introdurre la data dell’esame in corso, 
la data di nascita del paziente, la sua 


età maturativa, le classi dentarie dx e 
sin, il tipo di dentatura, il tipo musco¬ 
lare, il peso e l’altezza al momento 
dell’esame. Successivamente l’opera¬ 
tore deve introdurre alcune misure ri¬ 
levabili dai modelli 6—6, 3—3, arco 
individuale, curva di Spee dx e sin, 
discrepanze dente—arcata delle zone 
anteriori, medie e posteriori. Dopo di 
che il computer si appresta ad accetta¬ 
re in input, per mezzo della tavoletta 
grafica, i punti cefalometrici classici 
necessari per le analisi che verranno 
eseguite in un secondo tempo: sella 
turcica, A di Down, B di Down, po- 
rion, ANS, PNS eccetera. Si conclude 
la fase di input con la definizione del 
profilo delle parti molli, digitalizzate a 
gruppi di 5 punti. Una volta che queste 
informazioni sono state introdotte e 
memorizzate su disco, sono pronte per 
essere utilizzate dalle varie metodiche 
disponibili. 

Per quanto riguarda l’analisi di Ric¬ 
ketts, la fase di input è molto simile a 
quella prevista per le altre metodiche, 
sia dal punto di vista procedurale che 
dei contenuti, tuttavia raccoglie anche 
dati non leggibili dagli altri package, 
inoltre prevede una migliore definizio¬ 
ne dei profili delle parti molli e la pre¬ 
senza del contorno della cavità orbita¬ 
ria. Su stampante viene prodotto un 
output contenente una comparazione 
dei dati rilevati con i valori considerati 
normali per individui dell’età e del ti¬ 
po del soggetto in esame, con l’eviden- 
ziazione degli scarti da tale norma. 
Come negli altri casi il grafico su plot¬ 
ter viene realizzato in 4 colori, natural¬ 
mente se si utilizza Color Plotter Ap¬ 
ple. 

Dentai Check-up costa 1.960.000 
lire più iva nella versione plotter e 
986.000 lire più iva nella versione vi¬ 
deo. Ogni analisi, Tweed, Steiner, Co¬ 
ben e Ricketts, costa 676.000 lire più 
iva. 

Dentstar 80 e Dentai Check-up so¬ 
no prodotti da European Society of 
Medicai Software, Via Dalmazia 2, 
27029 Vigevano (PV), Tel. 
0381/84041. 
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studio martinetti 



Se desideri una stampante professionale 
Se pretendi qualità per word processing 
Se vuoi stampare testi e grafici 
Se cerchi grandi prestazioni a un prezzo 
eccezionale 


THEN 

LET 


allora 

EPSONLX-BD = la tua stampante 



Caratteristiche _ 

Stampa bidirezionale otti¬ 
mizzata 100 cps, 80 colonne - 
Matrice 9x9 modo testo, 6x8 
modo grafico - Possibilità di 
generare caratteri originali - 
Stampa ad alta qualità per word 
processing - Oltre 50 codici di 
controllo software - Funzioni 
selezionabili da pannello fron¬ 
tale - Possibilità trascinamento 
a trattore e alimentatore fogli 
singoli - Interfacce, RS 232 C e 
IEEE 488 


LX-80, la soluzione integrale più conveniente 


LX-80 è una nuovissima 
stampante frutto e sintesi di 
esperienze maturate in anni di 
leadership assoluta che hanno 
permesso alla EPSON di rea¬ 
lizzare un prodotto con presta¬ 
zioni professionali a un prezzo 
veramente conveniente. 


EPSON SEGI S.p.A. 

20124 Milano - Via Timavo, 12 - Tel. 02-6709136-7-8-9-0 
40121 Bologna - Via Pietramellara, 65 A/B - Tel. 051-273686 
35128 Padova - Via Pellizzo, 23/9 int. 4/U - Tel. 049-8070870 
00199 Roma - Via Asmara, 58 - Tel. 06-8395766 


4EPSONA 

WASim 











Ora che avete lavorato tanto p 

fate qualcosa p 



Apple, il marchio Apple, LaserWriter sono marchi della Apple Computer Ine. Macintosh è un marchio dato in licenza alla Apple Computer Ine. Jazz è un marchio registrato della Lotus Itd. 














;r scrivere la vostra relazione, 
sr farla leggere. 


È perfettamente inutile restare alzati la notte per 
scrivere un documento se poi la gente, leggendolo, 
si addormenta. 

Perchè anche le idee più brillanti sembrano 
noiose se non vengono presentate in una forma 
ugualmente brillante. Fortunatamente ci sono i 
personal computer Apple' 

Macintosh™ e Apple li vi aiutano a comunicare 
qualsiasi idea in modo più chiaro e persuasivo. 

E, allo stesso tempo, a risparmiare tempo prezioso. 
Innanzi tutto, considerate quello che in una 
presentazione colpisce a prima vista: la scrittura. 


Le capacità di word processing di un computer 
Apple vi permettono di comporre parole e cifre 
direttamente sullo schermo, con una normale 
tastiera. Potete scrivere, correggere, dare una veste 
editoriale, aggiornare e registrare interi paragrafi o 
pagine. Tutto in pochi secondi. 

Potete confrontare bozze, formati e caratteri. 
L’uno di fianco all’altro, contemporaneamente. 

Con Macintosh 512K e programmi come Jazz* 
della Lotus, potete convertire pagine e pagine di 
noiosi e incomprensibili dati statistici in efficaci 
grafici di facile lettura. 





Se poi modificate un dettaglio, ad 
esempio, nei fogli elettronici, anche il 
grafico viene automaticamente 
aggiornato. 

Poi, quando è tutto come desiderate, 
stampatelo in pochi secondi. 

Perfettamente. Con Apple LaserWriter.™ 


Otterrete documenti così nitidi da 
sembrare realizzati in tipografia. 

Testo e grafici. 

A questo punto avrete ottenuto due cose: 
un documento presentato così 
efficacemente che sarà difficile non 
leggerlo. E tempo in più per fare altre 


cose. Venite in un Apple Center, per 
conoscere Apple LaserWriter. Trovate gli 
indirizzi sulle Pagine Gialle. 

m. Apple Computer 












































Alcune tecniche di programmazione avanzata per chi 
vuole sfruttare al massimo le potenzialità del suo 
computer? Nella scorsa puntata abbiamo visto alcune 
fondamentali strutture di dati: stack, code e liste. In 
questa puntata tratteremo alcune applicazioni di queste 
tecniche nell’intento di ottimizzare l’occupazione di 
memoria e i tempi di accesso ai dati. 


Sette piccoli trucchi 


C onsiderate il caso in cui si debba¬ 
no memorizzare grandi quantità 
di dati, come ad esempio qualche cen¬ 
tinaio di schede identificative di clienti 
(o prodotti, o pazienti, o allievi eccete¬ 
ra). Considerate in particolare una 
scheda (record) di un cliente in cui i 
campi siano: nome, cognome, indiriz¬ 
zo, telefono, merce acquistata, data di 
acquisto, anticipo versato, saldo rima¬ 
nente, sconto, note varie ed even¬ 
tuali... 

Un’informazione di questo tipo oc¬ 
cupa mezza videata, cioè all’incirca 
mezzo Kbyte (13 x 40 = 520caratteri): 
avendo un centinaio di clienti, saranno 
indispensabili 50K per memorizzarli. 
Il grosso problema sorge quando que¬ 
sti record (le schede) debbono poter 
essere aggiunti o cancellati a piacere, 
senza sapere a priori quanti ce ne 
saranno. 

Tale tipo di dato prende il nome di 
“dinamico”, poiché può essere alloca¬ 
to e deallocato durante l’esecuzione 
del programma utente. In queste con¬ 
dizioni diventa essenziale la possibilità 
di recuperare lo spazio liberato dai da¬ 
ti cancellati. 


Garbage collection 


Tradotto alla lettera, “garbage col¬ 
lection” significa "raccolta della spaz¬ 
zatura": in ambito informatico indica 
la tecnica di recupero della memoria 
liberata dai dati cancellati. 

Consideriamo il programma di ge¬ 
stione delle liste, visto nella preceden¬ 
te puntata. Andando a rivedere la 
subroutine DELETE, notiamo che la 


di garbage: se quest’ultima fosse vuo¬ 
ta, l’allocazione verrà fatta normal¬ 
mente prendendo il primo elemento 
libero dell'array (puntato da FR). La 
subroutine DELETE, invece, dovrà 
“trasferire” l'elemento attuale dalla li¬ 
sta ufficiale alla lista di garbage. 

Prima di passare in esame il listato, 
soffermiamoci sulla struttura interna 
degli elementi della lista: come già 
detto, le informazioni relative a clienti 
(o prodotti o oggetti in qualche modo 
descrivibili) sono generalmente dei 
“record” costituiti da “campi”: nome, 
codice, data, quantità, note... Di que¬ 
sti campi ne esiste generalmente uno 
che identifica univocamente il record e 
che verrà chiamato “chiave”. Per 
esempio, per un cliente la chiave sarà 
il nome; per un prodotto sarà il codice; 
per un libro in biblioteca sarà il ti¬ 
tolo... 



cancellazione consiste in uno sposta¬ 
mento di puntatori, senza alcuna mo¬ 
difica alla stringa M$( AC), che rimane 
allocata inutilmente. Osservando la 
ADD, notiamo che i nuovi elementi 
vengono allocati ex novo, senza sfrut¬ 
tare gli eventuali “buchi” liberi. Ci 
proponiamo di modificare quel pro¬ 
gramma inserendo la possibilità di gar¬ 
bage collection. L’idea è quella di co¬ 
struire un’altra lista che contenga tutti 
gli elementi cancellati, da cui attingere 
per i prossimi inserimenti. 

11 medesimo array M$ conterrà due 
liste: una “ufficiale” la cui radice è RO 
(root) e l’altra “di immondizia” la cui 
radice è GA (garbage). In figura 1 
compare una rappresentazione grafica 
di un inserimento e di una cancella¬ 
zione. 

La subroutine ADD dovrà allocare i 
nuovi elementi prendendoli dalla lista 
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La chiave costituisce il riferimento 
per cercare l’elemento in memoria 
(FIND): per esempio, per sapere l’in¬ 
dirizzo del cliente “Mario Rossi”, ba¬ 
sterà fare un FIND specificando tale 
nome e il programma visualizzerà tut¬ 
to il record sul video. Implementiamo, 
dunque, una lista con chiave e garbage 
collection: la struttura fisica in memo¬ 
ria sarà quella illustrata in figura 2. 

Il listato 

Nel listato che segue osserviamo 
alla linea 20 il dimensionamento del¬ 
l’area di memoria per le informazioni 
M$(MX) ; quella per le chiavi K$(MX) 
e quella per i puntatori P(MX). Alla 
linea 70 osserviamo l’inizializzazione 
di GA, che è la radice della lista di 
garbage. 


Alla linea 100 inizia la subroutine 
ADD, che è molto simile a quella vista 
per la lista (scorsa puntata), tranne la 
parte iniziale, dove viene allocato il 
nuovo elemento. Nella linea 120 si 
considera il primo elemento della lista 
di garbage allo scopo di inserirlo nella 
lista ufficiale; se tale elemento non esi¬ 
stesse (linea 130) allora si dovrà allo¬ 
care ex novo un elemento dell’array 
(linee 160 e 170). Nelle linee 190 e 200 
vengono inserite nell'elemento appe¬ 
na allocato sia la chiave sia l’informa¬ 
zione. Le linee dalla 210 alla 290 sono 
uguali a quelle viste per la lista. 

Alla linea 300 inizia la subroutine 
DELETE, in cui potete osservare, 
dalla linea 340 a 370, che l’elemento 
viene “spostato” dalla lista ufficiale al¬ 
la lista di garbage (in testa a quest’ulti- 
ma, per comodità). 

Alla linea 500 inizia la subroutine 
FIND. che "percorre” la lista dall’ini¬ 
zio fino a quando trova l'elemento con 
chiave PI $ (linea 550): a questo punto 
assegna a P2$ l’informazione contenu¬ 
ta in quell'elemento (linea 590). 

La subroutine 700 (VIEW) stampa 
l’array visualizzando la posizione dei 
vari indici: RO, PR, AC.compre¬ 

so GA. La subroutine 900 (SCAN) 
stampa la lista seguendo l’ordine logi¬ 
co degli elementi, cioè considerando 
di volta in volta il puntatore al prossi¬ 
mo elemento (linea 970). Lo stesso 
procedimento viene utilizzato per 
stampare anche la lista di garbage 
(dalla linea 990 a 1040). 

Alla linea 2000 inizia l’interprete in¬ 
terattivo, per poter provare “a mano” 
le suddette subroutine. È bene ricor¬ 
darsi che lo scopo effettivo di queste 
subroutine (ADD, FIND,...) è quello 
di supportare l'uso di una struttura di 
dati (lista, coda, stack, ...) all’interno 
di programmi; quindi il loro normale 


Informazioni 

(Memory) 

M$(MX) 


Chiave 
(Key) 
K$(MX) 


Puntatori 
(Pointers) 
P (MX) 













• 



/ • 



.. :ì. v :;' v 



. : ."'f • 



. 


-, 


0 

ri 

2 


1-0 

0 

43 

0 


RO (ROot, radice della lista) 

PR (PRevious, elemento precedente) 
AC (ACtual, elemento attuale) 

GA (GArbage, lista di immondizia) 
FR (FRee, inizio stringhe libere) 


Figura 2. Struttura fisica della lista con chiave e garbage collection. 


uso sarà invisibile al contrario di quan¬ 
to avviene qui, a scopo di esercizio. 

Osservate, dalla linea 2110 alla 
2180, le istruzioni per l’inserimento di 
un nuovo elemento. Viene chiesto il 
punto di inserimento (linea 2120) cioè 
la chiave dell’elemento che seguirà 
quello nuovo: la subroutine 500 
(FIND) individua tale punto e lo fa 
puntare da AC. Vengono poi chieste 
chiave e contenuto da inserire e viene 
chiamata la ADD, seguita dalla 
SCAN (900) per visualizzare l’inseri¬ 
mento appena fatto. Analogamente 
per la cancellazione (da linea 2200 a 
2240): viene chiesta la chiave dell’ele¬ 
mento da cancellare (linea 2200), vie¬ 
ne localizzato tale elemento (FIND), 
viene cancellato (DELETE) e infine 
viene visualizzata la lista (SCAN). 

Dalla linea 2260 a 2290 viene effet¬ 
tuata la FIND di un elemento e viene 
stampato il contenuto (è il record di 
cui si è parlato all’inizio: dati anagrafi¬ 
ci del cliente, merce acquistata, data, 
acconto...). 


1 REM GARBAGE COLLECTION 

2 REM- 

10 MX - 10 :REM MAX 

20 OIM MI (MX), K* (MX), P(MX) 

30 RO - -1 :REM ROOT 
40 PR - -1 :REM PREVIOUS 
50 AC - -1 :REM ACTUAL 
G0 FR - -1 :REM FREE 
70 GA - -1 :REM GARBAGE 
80 GOTO 2000 

100 REM - 

110 REM ADD (INSERISCI PI* 
PRIMA DI AC) 

120 AC - GA 

130 IF AC - -1 THEN 160 
140 GA - P(GA) 

150 GOTO 190 

160 IF FR >- MX THEN 280 
170 FR - FR + 1 
180 AC - FR 
190 K*(AC) - PI* 

200 M*(AC) - P2* 

210 IF PR - -1 THEN 250 
220 P (AC) - P (PR) 

230 P(PR) - AC 
240 RETURN 
250 P(AC) - R0 
260 R0 - AC 
270 RETURN 

280 PRINT "MANCA SPAZIO" 

290 RETURN 

300 REM - 

310 REM DELETE (CANCELLA L’EL¬ 
EMENTO PUNTATO DA AC) 
320 IF AC - -1 THEN 440 
330 IF PR - -1 THEN 390 
340 P(PR) - P (AC) 

350 P (AC) - GA 
360 GA - AC 
370 AC - P(PR) 

380 RETURN 
390 R0 - P(AC) 

400 P(AC) - GA 
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410 GA - AC 
420 AC - RO 
430 RETURN 

440 PRINT "ESEGUI LA FIND !" 
4S0 RETURN 

500 RETI- 

510 REM FINO (FA PUNTARE DA AC 
L’ELEM. CON CHIAVE PI* E 
METTE IN P2* IL CONTENUTO) 
520 AC - RO 
530 PR - -1 

540 IF AC - -1 THEN 510 
550 IF K*(AC)-P1* THEN 590 
550 PR - AC 
570 AC - P(AC) 

580 GOTO 540 
590 P2* - MI(AC) 

500 RETURN 

610 P2* - "NON TROVATO" 

620 RETURN 

700 REM - 

710 REM VIEU (STAMPA L’ARRAY) 
720 FOR I - 0 TO MX 
730 PRINT I,K*(I),M*(I),P(1); 
740 IF I-RO THEN PRINT"<-RO"; 
750 IF I-PR THEN PRINT"<-PR"; 
760 IF I-AC THEN PRINT"<-AC“; 
770 IF I-FR THEN PRINT"<-FR"; 
780 IF I-GA THEN PRINT"<-GA"; 
790 PRINT 
800 NEXT I 
810 RETURN 

900 REM - 

910 REM SCAN (STAMPA LISTA) 

920 I - RO 

930 IF I - -1 THEN 990 
940 PRINT I. Kt (I ), M* (I ) ; 

950 IF I-AC THEN PRINT"<-AC"; 
950 PRINT “" 

970 1 - P(I) 

980 GOTO 930 

990 PRINT "GARBAGE LIST" 

1000 I - GA 

1010 IF I - -1 THEN RETURN 
1020 PRINT I, K*(I), M* (I ) 

1030 I - P (I ) 

1040 GOTO 1010 
2000 PRINT "A-ADD, O-DELETE" 
2010 PRINT "F-FINO, V-VIEU" 
2020 PRINT “S-SCAN, E-EXIT” 
2030 INPUT C* 

2040 IF C*-"A" THEN 2110 

2050 IF C*-"D" THEN 2190 

2060 IF C*-"F" THEN 2250 

2070 IF C*-"V" THEN 2300 

2080 IF C*-”S“ THEN 2230 


2090 IF Cto"E" THEN 2000 
2100 GOTO 2330 

2110 REM —ESEGUI ADO- 

2120 INPUT "PRIMA DI: ";P1* 
2130 GOSUB 500 :REM FIND 
2140 INPUT "CHIAVE: ";P1* 

2150 INPUT "CONTENUTO: ";P2t 
2150 GOSUB 100 :REM ADD 
2170 GOSUB 900 :REM SCAN 
2180 GOTO 2030 

2190 REM —ESEGUI DELETE- 

2200 INPUT "CHIAVE: ";P1* 

2210 GOSUB 500 :REM FIND 
2220 GOSUB 300 :REM DELETE 
2230 GOSUB 900 :REM SCAN 
2240 GOTO 2030 

2250 REM —ESEGUI FIND- 

2260 INPUT "CHIAVE: ";P1* 

2270 GOSUB 500 :REM FIND 
2280 PRINT "CONTENUTO- “;P2S 
2290 GOTO 2030 

2300 REM —ESEGUI VI EU- 

2310 GOSUB 700 :REM VI EU 
2320 GOTO 2030 
2330 END 


Hash 

Quella vista finora è una tecnica di 
ottimizzazione dello spazio di memo¬ 
ria: considerate ora il tempo medio di 
accesso a un elemento della lista. Poi¬ 
ché la ricerca di un elemento viene 
fatta percorrendo tutti gli elementi a 
partire dal primo (vedi FIND), il tem¬ 
po medio impiegato per trovare un 
qualsiasi elemento è N/2, dove N è il 
numero di elementi della lista. In pre¬ 
senza di parecchi elementi (qualche 
centinaio), questo tempo è troppo alto 
e soprattutto troppo irregolare, per¬ 
ché dipende dalla posizione dell'ele¬ 
mento da cercare: ci proponiamo ora 
di ottimizzare tale tempo, utilizzando 
una tecnica chiamata “hash”. 

In inglese “hash" significa miscu¬ 
glio, accozzaglia, carne trita. In ambi¬ 
to informatico, questo termine è usato 
per identificare una struttura di dati 
dove l’ordine degli elementi è stabilito 


automaticamente calcolando una fun¬ 
zione f(k) la cui incognita sia la chiave. 

Nelle strutture di dati finora viste, 
l’ordine veniva determinato dalla se¬ 
quenza cronologica degli inserimenti 
(stack, code) o scelto dall’utente (li¬ 
ste). Nella struttura a hash, invece, 
l’operatore di inserimento valuta una 
funzione (chiamata “funzione hash”) 
e determina autonomamente la posi¬ 
zione dell’elemento da inserire. 

Il più semplice esempio di funzione 
hash consiste nel ricavare il codice 
ASCII della prima lettera della chia¬ 
ve: il numero così trovato verrà utiliz¬ 
zato come indice in un array in cui 
inserire l’elemento. Altri esempi pos¬ 
sono essere: calcolare un numero che 
è la somma dei codici ASCII di tutte le 
lettere della chiave; oppure, conside¬ 
rare la lunghezza della chiave e calco¬ 
lare la funzione di essa. In ogni caso, il 
numero calcolato verrà usato come in¬ 
dice dell’array ove inserire gli elemen¬ 
ti, determinando così il loro ordine. 

Il grosso vantaggio di questa tecnica 
consiste nel ridurre drasticamente i 
tempi di accesso agli elementi; infatti il 
tempo richiesto per calcolare una fun¬ 
zione e fare un accesso a un array è di 
gran lunga inferiore al tempo necessa¬ 
rio per scandire una lista confrontando 
ogni chiave. 

Può capitare che la funzione hash 
dia lo stesso valore per chiavi differen¬ 
ti, come per esempio il caso di “Ame¬ 
lia” e “Alessandro” (se la funzione 
considera solo il primo carattere). In 
questi casi, si deve predisporre un’a¬ 
rea di memoria “di overflow” ove inse¬ 
rire i dati in conflitto. Vi sono diverse 
tecniche di gestione della memoria di 
overflow, ma la più semplice consiste 
nel creare una lista per ogni elemento 
dell’array, in cui poter inserire un nu¬ 
mero qualsivoglia di elementi aventi lo 
stesso valore di hash (figura 3). La 
ricerca di un elemento consisterà dun¬ 
que in un accesso a un array, seguito 
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inf. key 


Figura 3. Una struttura hash. 
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da una scansione di una lista, che si 
presume piuttosto corta perché con¬ 
tiene solo chiavi simili. 

Il programma 

Nel programma che implemente¬ 
remo, la funzione di hash restituirà 
semplicemente il numero d’ordine 
della prima lettera della chiave (A=0, 
B = l, C=2, ... solo maiuscole) 

HA = ASC(LEFT$(chiave$,l))-65 

L’array dovrà avere 25 componenti 
per poter contenere ogni possibile let¬ 
tera maiuscola; a ogni componente sa¬ 
rà “appesa” una lista avente tutte le 
chiavi che iniziano con la stessa lette¬ 
ra. Per esempio, alla terza componen¬ 
te sarà appesa una lista in cui le chiavi 
iniziano con “D”: Dario, Daniele, 
Diana,... 

La realizzazione di tale struttura di 
dati non differisce molto da quella del¬ 
la lista: l’unica differenza è che anzi¬ 
ché avere una sola radice RO, avremo 
un array di radici RO(25), come pote¬ 
te osservare nelle linee da 20 a 40 del 
listato che segue. La lista di garbage 
rimarrà unica e raccoglierà le “immon¬ 
dizie” provenienti da tutte le liste. 

La subroutine 100 ( ADD) differisce 
da quella del listato precedente per 
due aspetti: innanzitutto viene calco¬ 
lata la funzione hash (linea 210) per 
stabilire a quale radice appendere l’e¬ 
lemento (linea 230); in secondo luogo, 
l’elemento nuovo viene inserito appe¬ 
na dopo la radice anziché in un punto 
qualsiasi della lista (linee 220 e 230). 

La subroutine 300 (DELETE) dif¬ 
ferisce da quella del listato precedente 
solo nelle linee 390 e 420 in cui anziché 
RO compare RO(HA). Anche la 
subroutine 500 (FIND) differisce po¬ 
co: l’unica differenza è all’inizio, in cui 
viene calcolata la funzione hash (linee 
520 e 530). 

La subroutine 700 (VIEW) stampa, 
a fianco dell’array, anche le radici del¬ 
le liste (linee da 740 a 760). La subrou¬ 
tine 900 (SCAN) contiene un FOR su 
tutti gli elementi dell’array RO(RX) 
(linee 920 e 1010): vengono stampate 
solo le liste non nulle (linee da 930 a 
950). 

L’interprete interattivo (linee da 
2000 in poi) differisce da quello visto 
nel listato precedente solo per quanto 
riguarda la ADD (linee da 2120 a 
2160), infatti non è più necessario 
chiedere il punto di inserimento, dal 
momento che viene calcolato automa¬ 
ticamente attraverso la funzione hash 
e inserendo gli elementi sempre in te¬ 
sta alle liste. 



1 RErt HASH TABLE 

2 REH - 

10 MX - 10 :REn MAX 

15 Din nttnx), xnnx), pmxi 
20 RX - 25 :REn R00T MAX 
25 Din R0(RX) :REn R00TS 
30 FOR I - 0 T0 RX 
35 R0 ( I) - -1 
40 NEXT 1 

45 PR - -1 :REn PREVI 0US 
50 AC - -1 :REn ACTUAL 
55 FR - -1 :REn FREE 
G0 GA - -1 :REn GARBAGE 
55 GOTO 2000 

100 REn - 

110 REn ADD (INSERISCI PII IN 
TESTA ALLA LISTA OPPORTUNA) 

120 AC - GA 

130 IF AC - -1 THEN 150 

140 GA - P(GA) 

150 GOTO 190 

150 IF FR >- nX THEN 250 
170 FR - FR + 1 
180 AC - FR 
190 X*(AC) - Pl$ 

200 nt(AC) - P2I 
210 HA - ASC (LEFT* (PI*, 1) ) -55 
:REH HASH FUNCTI0N 
220 P (AC) - R0 (HA) 

230 R0(HA) - AC 
240 PR - -1 
250 RETURN 

250 PRINT "HANCA SPAZIO" 

270 RETURN 

300 REO - 

310 REn DELETE (CANCELLA L’EL- 
EHENT0 PUNTATO DA AC) 
320 IF AC - -1 THEN 440 

330 IF PR - -1 THEN 390 

340 P(PR) - P(AC) 

350 P(AC) - GA 
350 GA - AC 
370 AC - P (PR) 

380 RETURN 

390 R0(HA) - P(AC) 

400 P(AC) - GA 
410 GA - AC 

420 AC - R0 (HA) 

430 RETURN 

440 PRINT "ESEGUI LA FIND !" 
450 RETURN 

500 REO - 

510 REn FIND (FA PUNTARE DA AC 
L’ELEN. CON CHIAVE PI* E 
NETTE IN P2I IL CONTENUTO) 
520 HA - ASC(LEFT*(PII,1))-65 
:REN HASH FUNCT10N 
530 AC - R0(HA) 

540 PR - -1 

550 IF AC - -1 THEN 520 
550 IF X*(AC)-PI* THEN 500 
570 PR - AC 
580 AC - P(AC) 

590 GOTO 550 
500 P2* - n*(AC) 

510 RETURN 

520 P2* - “NON TROVATO" 

530 RETURN 

700 REN - 

710 REN VIEU (STANPA L’ARRAY) 
720 FOR I - 0 T0 NX 
730 PRINT I, Ki (I),Nt(I),P(I) ; 
740 FOR J - 0 T0 RX 
750 IF I - RO (J) THEN 

PRINT "<-R0(";Jj")"; 


750 NEXT J 

770 IF I-PR THEN PRINT"<-PR" 
780 IF I-AC THEN PRINT"<-AC" 
790 IF I-FR THEN PRINT"<-FR" 
800 IF I-GA THEN PRINT“<-GA H 
810 PRINT "" 

820 NEXT I 
830 RETURN 


900 REN - 

910 REN SCAN (STANPA LISTE) 

920 FOR J - 0 T0 RX 
930 IF RO(J) <> -1 THEN 

PRINT "LISTA ”;CHRI(J+S5) 
940 I - R0(J) 

950 IF I - -1 1HEN 1010 
950 PRINT I, X*(I), n*(I); 

970 IF I-AC THEN PRINT"<-AC"; 
980 PRINT ““ 

990 I - PII) 

1000 GOTO 950 
1010 NEXT J 

1020 PRINT "GARBAGE LIST" 

1030 I - GA 

1040 IF I - -1 THEN RETURN 
1050 PRINT I. XI(I), N*(I) 
1050 I - P (I ) 

1070 GOTO 1040 

2000 PRINT "A-ADD, D-DELETE" 
2010 PRINT "F-FIND, V-VIEU" 
2020 PRINT "S-SCAN. E-EXIT" 
2030 INPUT C* 

2040 IF C*-"A" THEN 2110 
2050 IF C*- ,, D“ THEN 2170 
2050 IF C*-"F" THEN 2230 
2070 IF C*-"V" THEN 2280 
2080 IF C*-“S“ THEN 2210 
2090 IF C*o"E“ THEN 2000 
2100 GOTO 2310 

2110 REN -ESEGUI ADD- 

2120 INPUT "CHIAVE: ";P1* 

2130 INPUT "CONTENUTO: ";P2* 
2140 G0SUB 100 :REN ADD 
2150 G0SUB 900 :REH SCAN 
2160 GOTO 2030 

2170 REN —ESEGUI DELETE- 

2180 INPUT "CHIAVE: ";P1* 

2190 G0SUB 500 :REH FIND 

2200 G0SUB 300 :REN DELETE 

2210 G0SUB 900 :REtt SCAN 

2220 GOTO 2030 

2230 REn -—ESEGUI FIND - 

2240 INPUT "CHIAVE: ";P1* 

2250 G0SUB 500 :REN FIND 
2260 PRINT "CONTENUTO- ”;P2* 
2270 GOTO 2030 

2280 REN —ESEGUI VIEU- 

2290 G0SUB 700 :REN VIEU 
2300 GOTO 2030 
2310 END 


Nella prossima puntata vedremo 
una tecnica molto elegante per la ge¬ 
stione di strutture come quelle viste 
finora: gli “algoritmi ricorsivi”. Appli¬ 
cheremo poi tale tecnica a una struttu¬ 
ra particolarmente interessante: gli 
“alberi binari”. 

Alessandro Mazzetti 
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• MacSap 

Si tratta di un programma destinato agli studi professio¬ 
nali che progettano strutture sofisticate sia in acciaio sia in 
calcestruzzo armato, anche in zona sismica. Grazie all’in¬ 
terfaccia grafica interattiva, consente un approccio diretto 
e naturale con notevole diminuzione dei costi di esercizio. 
MacSap consente l’analisi statica e dinamica (opzionale) di 
strutture del tutto generali con il metodo degli elementi 
finiti. È dotato di sofisticati algoritmi per l’ottimizzazione 
delle risorse di calcolo. È disponibile una libreria di ele¬ 
menti finiti monodimensionali particolarmente adatti alla 
progettazione edile. Il database del programma può essere 
utilizzato anche dai post—accessori per il progetto degli 
elementi strutturali in acciaio e in calcestruzzo armato 
(Macbeam) per l’automazione del processo progettuale. 
L’interfaccia grafica interattiva permette di interagire di¬ 
rettamente con il disegno tridimensionale fornendo un 
sistema di dialogo e un approccio di calcolo del tutto nuovo 
per un personal computer. Configurazione necessaria: 
Macintosh 512K e drive esterno; l’hard disk è vivamente 
consigliato. Il costo della sola analisi statica è di 1.950.000 
lire, mentre l’opzionale analisi dinamica costa 950.000 lire, 
in entrambi i casi l’iva è esclusa, è prodotto da Softing, Via 
Reggio Calabria 6,00161 Roma, telefono (06) 4248732. 
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• MacBeam 

Come MacSap, anche questo è un programma destinato 
agli studi professionali che progettano strutture in cemen¬ 
to armato, e in particolare nel settore dell’edilizia. Mac¬ 
beam consente il progetto e il disegno esecutivo delle 
armature metalliche di travi e pilastri in calcestruzzo arma¬ 
to. Può essere utilizzato sia autonomamente che come 
post—processore di Macsap. Consente la progettazione 
rigorosa di travi a presso flessione retta e di pilastri a presso 
flessione deviata con il metodo delle tensioni ammissibili. 
Il programma è in grado di considerare tutte le combina¬ 
zioni di carico possibili tra quelle assegnate, anche esclu- 
dentisi. Ogni progetto viene eseguito in un numero di 
conci finiti in relazione al braccio delle forze interne per 


assicurare risultati corretti per tutta la lunghezza dell’ele¬ 
mento. Il programma tiene conto della stabilità locale al 
taglio e alla flessione, delle tensioni tangenziali di aderen¬ 
za per gli ancoraggi, dell’ottimizzazione nella scelta dei 
diametri, della disposizione delle armature e di tutte le 
prescrizioni regolamentari. Inoltre il programma è dotato 
di un sistema di disegno assistito dall’elaboratore (CAD) 
che consente di intervenire direttamente sul disegno pro¬ 
dotto dal programma per apportare modifiche, personaliz¬ 
zazioni tecniche, note esplicative eccetera. Configurazio¬ 
ne necessaria: Macintosh 512K. Il prezzo è 1.200.000 lire 
più Iva, è distribuito da Softing, Via Reggio Calabria 6, 
00161 Roma, telefono (06) 4248732. 



• Mac3D 

È un potente pacchetto progettato per creare figure 
tridimensionali. È indicato per progettare modelli archi- 
tettonici, diagrammi e grafici di ingegneria, figure di parti 
meccaniche, illustrazioni e lavori artistici in generale. 
L’approccio è notevolmente semplificato grazie alla possi¬ 
bilità di selezionare un gran numero di forme elementari, 
di portarle automaticamente in 3D e di adattarle alle speci¬ 
fiche esigenze: stirandole, ingrandendole, modificandole e 
ruotandole in ogni direzione. Sono disponibili 22 Shape 
Tools tra cui: rettangoli, ellissi, poligoni, archi, prismi, 
piramidi, coni, tori eccetera. È possibile rimodellare qual¬ 
siasi tipo di figura spostando un vertice, uno spigolo e 
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addirittura un’intera superficie. La capacità di far ruotare 
ogni oggetto di 360 gradi in ogni direzione e di spostare il 
punto di vista sull’oggetto, ridurlo e ingrandirlo in scala, 
permette di osservarlo in ogni dettaglio, perfino dall’inter¬ 
no. C’è la possibilità di scegliere tra una grande varietà di 
disegni di riempimento di fonti e stili di caratteri. Mac3D 
necessita di 512K e supporta sia l’ImageWriter che la La¬ 
serWriter. È prodotto da Challenger Software 18350 Ked- 
zie Avenue, Homewood Illinois (USA) 60430, telefono 
(001) (312) 957-3475. 


• Document Modeler 


Consente di progettare delle strutture di validità genera¬ 
le per creare dei modelli variabili per stampare documenti. 
Un problema che sorge molto spesso in ambiente profes¬ 
sionale è quello di stampare un gran numero di documenti 
più o meno simili come struttura, ma diversi per quanto 
riguarda caratteristiche di ordine minore. Document Mo¬ 
deler consente di riutilizzare la struttura grezza di un mo¬ 
dello, per crearne degli altri, con notevole risparmio di 
tempo e di risorse. È costituito da due programmi: Tem- 
plate Maker e Document Maker. Il primo serve a costruire 


é File Edit Document Maker 
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This is an offer to 
buy a car. It 
becomes a contract 
luhen accepted by 
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is thè name of thè seller? 


il modello grezzo: utilizzando come input un testo scritto 
con MacWrite, nel quale sono state introdotte tutte le 
specifiche sulle parti variabili e i parametri di scelta, tra¬ 
sforma lo scritto in una struttura vera e propria. A questo 
punto il "template" così ottenuto diviene l’input del secon¬ 
do programma. Document Maker, attraverso una serie di 
prompt, chiede che vengano introdotte le risposte per 
selezionare le parti variabili del testo. Ogni documento 
può essere formattato utilizzando tutte le fonti e gli stili di 
Macintosh e MacWrite, inoltre è possibile assemblare del¬ 
le figure, dei grafici o delle foto digitalizzate. Ogni docu¬ 
mento può essere lungo tanto quanto è permesso da 
MacWrite. Il risultato ottenuto può essere stampato diret¬ 
tamente o salvato su disco e richiamato successivamente 
con MacWrite. Document Modeler costa 299 dollari ed è 
prodotto da Model Office Company, Gooderham Flatiron 
Building, 49 Wellington St. East, Toronto, Canada, tele¬ 
fono (001) (416) 860-1033. 


• Project Modeler 

Consente di organizzare e coordinare una serie anche 
complessa di attività al fine di realizzare un progetto. La 
realizzazione di ogni progetto viene scomposta in quattro 
punti fondamentali: identificazione dei passi e delle azioni 
necessarie per completare il progetto, controllo delle date 





e dei tempi di realizzazione affinché tutte le attività non 
subiscano dei ritardi o dei tempi morti, raccolta e organiz¬ 
zazione delle informazioni e dei documenti accumulati 
durante la realizzazione e mantenimento di tutta la docu¬ 
mentazione prodotta dal progetto stesso. Il pacchetto è 
articolato in tre programmi : Guide Maker produce il "tem¬ 
plate" del progetto; attraverso MacWriter devono essere 
introdotti: le operazioni che devono essere compiute, il 
materiale che deve essere disponibile per l’utente, le infor¬ 
mazioni che devono essere accumulate, le scadenze e i 
calcoli che il computer deve eseguire. Tutte queste infor¬ 
mazioni vengono utilizzate per creare una guida di riferi¬ 
mento al progetto e salvate in un file chiamato Log. 

Expediter è il programma principale, funziona come 
una sorta di integratore e consente di elaborare, aggiunge¬ 
re e modificare le informazioni riguardanti i vari passi, 
attraverso numerose finestre: Reference, che contiene in¬ 
formazioni sulla fase attuale, Facts, che identifica tutti i 
fatti che secondo l’autore del progetto sono importanti, 
Checklist, che raccoglie i passi elementari e le scadenze, 
note, annotazioni di ogni altro tipo, ecc. 

Calendar è un semplice ma potente strumento di sup¬ 
porto che mantiene tutte le date critiche delle varie attività 
e viene utilizzato da Expediter che attraverso una serie di 
entry può decidere la priorità delle operazioni. Project 
Modeler costa 299 dollari ed è prodotto da Model Office 
Company, Gooderham Flatiron Building, 49 Wellington 
St. East, Toronto Canada, telefono (001) (416) 860—1033. 

• MacDraft 

E il software più potente tra quelli orientati alla defini¬ 
zione di immagini. È estremamente facile utilizzarlo e 
consente anche ai non professionisti di creare prodotti di 
ottima qualità. Le sue caratteristiche più innovative sono 
essenzialmente 4: consente di zoomare sulle figure, cioè di 
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avvicinare e allontanare il punto dell’osservatore; consen¬ 
te di ruotare un oggetto o addirittura gruppi di oggetti 
anche di un grado alla volta e anche scegliendo come asse il 
centro del gruppo; permette di utilizzare 16 differenti scale 
in piedi e pollici e 12 in sistema metrico, inoltre permette di 
manipolare fino a 4 documenti contemporaneamente sullo 
schermo. La possibilità di creare linee autodimensionanti 
sullo schermo facilita il calcolo delle dimensioni degli og¬ 
getti della figura. Può caricare figure definite con Mac- 
Draw e MacPaint, spostare oggetti da un documento all’al¬ 
tro e utilizzare ben 64 fondini per caratterizzare gli oggetti. 
MacDraft costa 239 dollari, è prodotto da Innovative Data 
Design, 1975 Willow Pass Road, Suite 8, Concord Califor¬ 
nia (USA) 94520, telefono (001) (415) 680—6818. 



• Fluent Fonts 


Consiste di due dischi di word processing e fonti grafi¬ 
che, in ben 49 stili diversi. Ci sono caratteri ebrei, cirillici, 


polacchi, cechi e slovacchi; simboli di tutti i generi: mate¬ 
matici, ingegneristici, chimici, astronomici, architettonici 
e meteorologici. Contiene anche piccole figure e simboli 
per definire cornici. Tutte le fonti possono essere utilizzate 
per potenziare MacWrite e MacPaint. Costa 49,95 dollari 
ed è prodotto da Casady Company, Carmel CA (USA) 
93921, telefono (001) (408) 646-4660. 

• Speller Bee 

Viene dalla California il primo software educativo in 
grado di dialogare con lo studente. Progettato da First 
Byte, la stessa software house che ha prodotto Smooth 
Talker, Speller Bee scaturisce dalla stretta collaborazione 
tra insegnanti e programmatori per condurre i bambini in 
età prescolare nella loro crescita e maturazione, insegnan¬ 
do loro a leggere, scrivere e sillabare correttamente. Gli 
studenti vengono messi alla prova da test e giochi audiovi¬ 
sivi che stimolano e arricchiscono la loro capacità di comu¬ 
nicare. Attraverso 8 livelli di difficoltà, utilizzando giochi 
divertenti e numerosi test, insegna ai bambini a riconosce¬ 
re le parole e a capirne l’esatto significato. Per gli studenti 
alle prime armi che ancora non sanno leggere, gli esercizi e 
le scelte dei menù sono guidate da immagini grafiche che 
ne richiamano il significato. Il programma dispone di ben 
150 gruppi di parole predefinite. A ogni gruppo, costituito 
da 10 parole di massimo 15 caratteri ciascuna, è associato 
un diverso livello di difficoltà. È possibile aggiungere altri 
gruppi, oltre a quelli predefiniti, allo scopo di aumentare la 
difficoltà o di arricchire e aggiornare il materiale delle 
esercitazioni. Il programma mostra come è scritta e sillaba- 
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ta correttamente la parola, lo studente deve tentare di 
digitarla esattamente. Esaurite le parole di un gruppo Mac 
giudica il lavoro dello studente che a seconda dell’esito può 
passare al livello successivo o ripetere l’esercizio e a sotto¬ 
porsi ai giochi per migliorare le sue capacità. I giochi 
disponibili sono tre: un anagramma nel quale è necessario 
ricostruire una parola che il computer ha sillabato in modo 
confuso, una ricerca della parola sillabata tra molte altre e 
una ricerca delle lettere mancanti. Speller Bee costa 79,95 
dollari, è prodotto da First Byte, 2845 Tempie Avenue, 
Long Beach CA (USA) 90806, telefono (001) (213) 
5957006. 

• Dasch 

Disk Acceleration Storage Control Hardware è un 
RAM disk di tipo avanzato e a basso costo, studiato per 
aumentare la capacità (da 0,5 a 2 Megabyte) e soprattutto 
la velocità di memorizzazione di Mac. Un RAM disk non è 
altro che un array di RAM, alimentato separatamente 
dall’elaboratore, e che quindi a differenza dei floppy e 
degli hard disk non memorizza i dati su un supporto ma¬ 
gnetico. La velocità di accesso è nettamente superiore. Per 
esempio con MacWrite un caricamento che da floppy ri¬ 
chiede 27,5 secondi, con il RAM disk ne richiede soltanto 
6,1. Se con MacPaint e un Floppy ne occorrono 24,9, con 
RAM disk appena 4,3. Possono essere collegati insieme 
più RAM disk per una capacità complessiva massima di 32 
Mb. RAM disk non vuol dire solo velocità, ma anche 
flessibilità e sicurezza. Una parte della RAM di Dasch può 
essere infatti utilizzata come buffer per la stampante, inol- 
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tre in caso di crash del sistema i dati contenuti non vengono 
in alcun modo influenzati. Dasch è disponibile in tre mo¬ 
delli: Dasch 5 da 0,5 Mb, Dasch 10 da 1 Mb e Dasch 20 da 
2Mb, è prodotto da Western Automation Laboratories, 
1700 North 55th Street, Boulder Colorado (USA) 80301, 
telefono (001) (303) 449-6400. 


• Kid Talk 

E stato progettato sia per insegnare a leggere e a scrive¬ 
re, sia per portare gli studenti a conoscenza delle relazioni 
intercorrenti tra lettere e parole e tra parole e frasi, nel 
contesto di un discorso organico. Il programma è costituito 
da due parti a seconda che lo studente sappia o meno 
leggere. Chi non sa ancora leggere viene guidato nell’ap- 
prendimendo delle lettere dell’alfabeto e delle parole uti¬ 
lizzate più frequentemente. Chi invece sa leggere ha a 
disposizione una grande varietà di esercizi per migliorare 
le sue capacità. Mac può essere utilizzato per scrivere 
storie, poesie, discorsi e lettere, per correggere del mate¬ 
riale scritto, per far pratica del word processing, per ascol¬ 
tare dalla voce del computer una storia creata con gli amici 
e anche per migliorare la conoscenza di una lingua stranie¬ 
ra. E consentito intervenire sulla pronuncia e sul timbro di 
voce, per esempio scegliendo tra voce maschile e femmini¬ 
le, tra un timbro duro e uno morbido, e modificare altre 
variabili, attraverso un apposito pannello di controllo po¬ 
sto nel menù principale. Kid Talk costa 79,95 dollari, è 
prodotto da First Byte, 2845 Tempie Avenue, Long 
Beach, CA (USA) 90806, telefono (001) (213) 5957006. 



Seikosha ti invita nel meraviglioso mondo delle sue stampanti. 

Un mondo fatto di progresso, di elevatissima qualità, velocità e silenziosità di stampa. 
Seikosha oggi ti propone la più vasta gamma di stampanti, compatibili e affidabili, ideate 
per esaltare le prestazioni di ogni tipo di computer. 

All'altezza di ogni esigenza, anche della tua. 
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Spinner prende qualsiasi stringa di caratteri alfanumerici 
e la fa ruotare lungo il perimetro dello schermo in moto 
continuo, in senso orario o antiorario. La stringa è 
visualizzata in campo inverso e può essere lunga fino a 
255 caratteri. Potete controllare la velocità della 
rotazione, daH’immobilità fino a una velocità tale da 
rendere la scritta illeggibile. E non è finita qui... come 
dimostrano i demo. 


: DOS 3.3~ ]: 
ProDOS 
APPLE Ih : 
APPLE //c 


Che fascino 
se scorre il titolo 


A lcuni giudicano frivole le utility 
che hanno per obiettivo il perfe¬ 
zionamento estetico dei programmi. 
Niente di più errato: trovarsi davanti 
una bella presentazione, una grafica 
curata e magari anche qualche simpa¬ 
tico ammiccamento non dispiace mai. 
Anzi, è spesso indice di quell’attenzio¬ 
ne e di quell'abilità che tutti desideria¬ 
mo poi ritrovare nel programma vero 
e proprio. 

L’idea che Spinner propone, molto 
utile in alcuni casi e comunque grade¬ 
vole anche negli altri, è quella di predi¬ 
sporre lo scorrimento di una stringa, 
lunga fino a 255 caratteri: l’intestazio¬ 
ne di un programma, per esempio, le 
istruzioni di un gioco, l’evidenziamen- 
to di alcune frasi... 

Anche la presentazione sullo scher¬ 
mo dei vari menù di un programma 
può acquistare moltissimo in appeal se 
ben studiata con lo Spinner, e l'uso del 
programma, di conseguenza, può es¬ 
sere più gradevole; per esempio due 
successive videate con le opzioni di¬ 
sponibili possono essere differenziate 
tra di loro con notevoli effetti speciali, 
alternando scorrimento orario e scor¬ 
rimento antiorario, campo inverso e 
campo normale, trasferimeno e ritor¬ 
no di caratteri. 

Stampa in Basic 

La prima versione dello Spinner è 
stata scritta in Basic con l’impiego del¬ 
le istruzioni PRINT, VTAB e HTAB. 
Questi comandi pongono però alcune 
limitazioni, che si configurano così: 

• la stampa della quarantesima colon¬ 


na (HTAB 40) causa 1’emissione di 
un’interlinea a meno che non si intro¬ 
duca un punto e virgola. 

• quando si stampa a VTAB 24, 
HTAB40 viene emesso un ritorno car¬ 
rello, e questo fa scorrere la videata in 
su di una riga. 


• il Basic è troppo lento. 

Il problema era dunque quello di 
trovare il modo di trasmettere un mes¬ 
saggio allo schermo senza ricorrere al¬ 
l’impacciata istruzione PRINT del Ba¬ 
sic. La risposta sta nel linguaggio mac¬ 
china, il più veloce dell’Apple. 


Listato 1 

SOURCE FILE: 

ÌPIWER.0BJ0 




0000 


1 » 




0000 


2 * SPItflER 



0000 


3 * 8Y STEVE KEARNS 


0000 


4 * COPYRIGHT (0 1985 


0000 


5 * BY APPLICANDO 4 


0000 


6 * MICROSPARi 

, INC. 


0000 


7 » APPLE DOS 

TOOLKIT ASSEMBLER 

0000 


8 * 





NEXT 08JECT FILE 1WME IS 

SPIWER 


0000 


9 

ORG 

$6000 

jDecimale 24576 

6000 


10 » 




6000 


11 * INDIRIZZI 

IN PAGINA ZERO 

6000 


12 * 




0006 


13 ADDR 

EQU 

$6 

; indirizzo del descrittore della stringa immessa 

0008 


14 DIR 

EQU 

$8 

;direzione della rotazione 

0028 


15 BASL 

EQU 

$28 

; indirizzo della locazione di scherno trovata da BASCALC 

0083 


16 VARPNT 

EQU 

$83 

jusata da PTRGET per il descrittore della stringa 

6000 


17 » 




6000 


18 » INDIRIZZI 

APPLESOFT 


6000 


19 » 




FOCI 


20 BASCALC EQU 

$FBC1 

jtrova l'indirizzo della riga di scherno in A 

DEBE 


21 CHKCOM 

EQU 

$DE8E 

toglie la virgola dalla linea immessa 

DFL3 


22 PTRGET 

EQU 

$DFE3 

prova l'indirizzo del descrittore della stringa imiessa 

6000 


23 » 




6000 


24 * MUOVE LA STRINGA 


6000: 

25 * 




6000:20 BE DE 

26 

JSR 

CHKCOM 

jrinuove la virgola. SYNTAX ERROR se non c'e' 

6003:20 E3 DF 

27 

JSK 

PTRGET 

prova il descrittore della stringa immessa 

6006 :A0 00 

28 

IDY 

«0 


6008:81 83 

29 

LDA 

(VARPNT),Y 

scarica nell'accumulatore la lunghezza della stringa immessa 

600A :80 C2 60 

30 

STA 

STRLEN 

1 a memorizza come lunghezza della stringa di rotazione 

600D:C8 

31 

1NY 



600E :B1 83 

32 

EOA 

(VARPNT),Y 

;byte basso del descrittore di stringa 

6010:85 06 

33 

SIA 

ADDR 

lo memorizza 

60 ! 2 : C8 

34 

INY 



6013:81 83 

35 

LDA 

(VARPNT),Y 

jbyte alto del descrittore di stringa 

6015:85 07 

36 

STA 

ADDR+1 

lo memorizza 

6017:A0 FF 

37 

IDY 

4$FF 


6019 :C8 

38 LOOP 

INY 



601A:B1 06 

39 

LDA 

(ADDR),Y 

riceve un carattere della stringa 

601C:18 

40 

ULC 


idear carry per l'addizione 
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Dopo il tentativo (non riuscito) di 
usare l’istruzione PRINT, la soluzione 
migliore è apparsa quella di scrivere 
semplicemente nella memoria di 
schermo, con istruzioni POKE, i valo¬ 
ri ASCII delle lettere da visualizzare. 
L’Apple usa $400—$7FF come princi¬ 
pale buffer di testo dello schermo. 
Qualsiasi carattere può essere modifi¬ 
cato senza influire sul resto del buffer. 
Chiaramente è questo il modo più faci¬ 
le di evitare le limitate istruzioni 
PRINT dell’Applesoft. 

Come si usa Spinner 

Vediamo innanzitutto come va usa¬ 
to Spinner, e poi come funziona. Si 
deve caricare Spinner (listato 1) con 
BLOAD. Facendo BRUN SPINNER 
avrete un messaggio di SYNTAX ER- 
ROR. Lo Spinner è situato sopra la 
pagina 2 della grafica Hi—Res ($6000 
o decimale 24576). 

Il programma ha la capacità di usare 
stringhe Basic. Per usare lo Spinner 
con stringhe Basic si devono seguire 
due passi. Per prima cosa inserite 
CALL 24576, varstr$ 

Non si può omettere la virgola. Que¬ 


sto comando trasferirà il contenuto di 
una variabile stringa nel buffer dello 
Spinner. Con il trasferimento della 
stringa tutti i caratteri sono convertiti 
in campo inverso. Secondo passo, 
CALL 24630 sposterà il messaggio di 
un carattere nella direzione voluta. 

La direzione della rotazione è co¬ 
mandata da voi. Con POKE 8,0 si crea 
una rotazione in senso antiorario, 
mentre POKE 8,1 avrà come effetto 
una rotazione in senso orario. Succes¬ 
sive chiamate a 24630 daranno alla 
stringa l’apparenza del movimento. 
Questa tecnica è illustrata meglio nel¬ 
lo SPINNER.DEMOl (listato 2), con 
inizio a linea 790. 

Lo Spinner accetterà anche dati non 
stringa con l’aiuto di una subroutine in 
Basic. Questa routine consente la vi¬ 
sualizzazione di messaggi in testo lam¬ 
peggiante e normale così come in in¬ 
verso. La routine è considerevolmente 
più lenta della routine incorporata nel¬ 
lo Spinner, ma la cosa non può essere 
evitata. La routine risulta dalle linee 
900-990 del programma dimostrati¬ 
vo. 

Una terza maniera di usare lo Spin¬ 
ner consiste nel POKE della lunghez¬ 
za e dei valori ASCII della stringa da 


601D:C9 3F 

41 

CMP 

463 

601F : FO 07 

42 

BEO 

N0SUB 

4021:90 05 

43 

BCC 

N0SUB 

6023:09 80 

44 

ORA 

4128 

6025:38 

45 

SEC 


6026:E9 CO 

46 

SBC 

4192 

6028:99 C3 60 

47 N0SUB 

STA 

STRINO,Y 

602B:CC C2 60 

48 

CPY 

STRLEN 

602E:D0 E9 

49 

BNE 

LOOP 

6030: 

50 * 



6030: 

51 * SPINNER COMINCIA ALL 

6030: 

52 * DELLA STRINGA E A22EI 

6030: 

53 * DI STRINGA (0LDBEG = 

6030: 

54 * 



6030:A9 00 

55 

LDA 

40 

6032:8D CO 60 

56 

STA 

0LDBEG 

6035:60 

57 

RTS 


6036: 

58 * 



Itti 

59 * PARTENZA A CALDO DEL 

4036:A0 27 

61 

LDY 

439 

6038:AE CO 60 

62 

LDX 

0LDBEG 

603B: 

63 * 



603B: 

64 * INIZIA NELL'ANGOLO 11 

603B: 

65 * E MUOVE IN BASSO 

60 3B: 

66 * 



603B:A9 01 

67 

LDA 

41 

403D: 80 CI 60 

68 

STA 

TEMPI 

6040:20 CI FB 

69 START2 

JSR 

BASCALC 

6043:BD C3 60 

70 

LDA 

STRING.X 

6046:91 28 

71 

STA 

(BASL),Y 

6048:20 B7 60 

72 

JSR 

CHECKX 

6Q48:EE CI 60 

73 

INC 

TEMPI 

604E:AD CI 60 

74 

LDA 

TEMPI 

6051 ;C? 18 

75 

CMP 

424 

6053:DO EB 

76 

BNE 

START2 

6055: 

77 * 



6055: 

78 * MUOVE IN ORIZZONTALE 

6055: 

79 » 



6055:A9 17 

80 

LDA 

423 

6057:20 CI FB 

81 

JSR 

BASCALC 

605A:AO 26 

82 

LDY 

438 

605C : B0 C3 60 

83 START3 

LDA 

STRING.X 

605F : 91 28 

84 

STA 

(BASL?,Y 

6061:20 B7 60 

85 

JSR 

CHECKX 

6064:88 

86 

DEY 



jse il carattere e' uno spazio o meno 
; al 1 ora e' allora e' in inverse 
;non sottrae 192 
;canbia il carattere in normal 
iper la conversione in inverse 
isottrae 192 

jraemorizza il carattere inverse nel bufter 
{fine della stringa? 

;no, riceve la lettera seguente 


{azzera il puntatore 
;return 


;KTAB 39 

{posizione iniziale della stringa 


{carica OTAB nel l'accuniulatore < 1=VTAB 2) 

;lo salva 

{trova la locazione di memoria della linea A 
{riceve dal but-fer il carattere da visualizzare 
{lo mette sul video 
{controlla la posizione nella stringa 
{incrementa VTAB 


alla base dello schermo? 
passa alla 1inea seguente 


;VTAB 29 

{trova la locazione per VTAB 24 
jHTAB 39 

{riceve il carattere da visualizzare 
;lo mette sullo schermo 
{controlla il puntatore della stringa 


{decrementa HTAB 


( continua) 



Solitudine. 

Solitudine è possedere un computer e non usarlo... 
perchè mancano i programmi o l'assistenza tecnica 
o gli accessorio... 

No! Noi non vendiamo solo computers. 

Ma mettiamo a disposizione tutte le risorse che sol¬ 
tanto unagrande organizzazione può offrire. Questo 
è il segreto della nostra continua affermazione. 

No! Noi non vendiamo solo computers. 


■Via Nizza, 48150/52 T. 061844.84.18 

■ Via Nizza, 26120132 T. 061844.11.36 

■ Via Soana, 24/26/28 T. 06/759.15.44 

■ Via P. Fiscali, 257/257a/257b T. 06/811.02.43 

■ Via Q. Majorana, 149/153/155 

T. 06/55.77.39*4-55.88.852 
I Ass. Tee.: Via Terni, 86/86a/86b T. 06/757.89.36 



Computer 

Center 


all’altezza dei tuoi 


problemi. 


Sempre 
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visualizzare. Dovete dapprima scrive¬ 
re con POKE la lunghezza della strin¬ 
ga in 24770, facendola seguire dai co¬ 
dici di carattere della stringa con inizio 
a 24771. Prima di introdurre la routine 
principale di movimento fate CALL 
24624 per reimpostare gli indici e muo¬ 
vere il messaggio una volta. Da questo 
punto in poi potete utilizzare la routi¬ 
ne principale di movimento (a 24630) 


per muovere il messaggio come desi- 
dcrstc 

SPINNER.DEM02 (listato 3) è 
una semplice dimostrazione di questo 
procedimento che usa una stringa di 
due caratteri, consistente in uno spa¬ 
zio inverso e uno normale. 

Come potete vedere lo Spinner non 
bada alla fonte delle sue informazioni. 
Quella della dimostrazione è solo una 


delle molte potenziali combinazioni di 
caratteri che producono effetti inte¬ 
ressanti. 

La distanza 

Sorge poi la questione delle lun¬ 
ghezze di stringa da utilizzare per ave¬ 
re i migliori risultati. E un calcolo mol¬ 
to semplice da fare (sì, c’è una soluzio¬ 
ne matematica!). Il numero dei carat¬ 
teri lungo il perimetro dello schermo 
dell’Apple è 124. Ce ne sono 40 da 
un’estremità all’altra della sommità e 
della base, e 22 sulla sinistra e sulla 
destra. Il totale dei caratteri di ciascun 
lato non è 24 perché abbiamo già con¬ 
tato gli angoli come parte delle righe 
della sommità e della base. Così deter¬ 
miniamo che il perimetro consta di 40 
+ 40 + 22 + 22 = 124 caratteri. Le 
migliori lunghezze da usare sarebbero 
perciò i fattori di 124 (che sono 2, 4, 
31, 62 e 124). 

La ragione dell’impiego di una di 
queste lunghezze è semplice: se si usa 
una stringa lunga 31 caratteri la stringa 
sarà visualizzata 124/31 ossia quattro 
volte attorno allo schermo. Per esem¬ 
pio una stringa di 20 caratteri compari¬ 
rà sullo schermo 124/20 ossia 6,2 volte. 
In altre parole la stringa sarà visualiz¬ 
zata sei volte intere più due decimi, 
vale a dire i primi quattro caratteri 
della stringa. 

SPINNER.DEMOl dà un esempio 
di ciascuna delle lunghezze di stringa a 
numeri pari, compresa una routine per 
far salire un titolo centrato fino alla 
sommità dello schermo. 

Introduzione 
dei programmi 

Digitate Spinner (listato 1) in as¬ 
sembler o inserite il linguaggio mac¬ 
china direttamente in memoria (per 
avere un aiuto vedete "Per chi comin¬ 
cia", a pag. 105). Se inserite lo Spinner 
usando il monitor, salvatelo su di¬ 
schetto battendo: 


BSAVE SPINNER,A$6000,L$E2 


Il listato 2 può essere salvato con il 
comando: 


SAVE SPINNER.DEMOl 


Come funziona 

Anziché sezionare lo Spinner linea 
per linea, conviene considerare un 
profilo generale delle sue principali 


<SOÓ5:CO 00 

87 

CPY 

«0 

;bordo dello schermo? 

4047:D0 F3 

88 

BNE 

START3 

;no, va avanti 

<50<49: 

89 * 




40<49 : 

90 * MUOVE 

OAL BASSO A SINISTRA VERSO L'ALTO 

6069: 

91 * 




6069:A0 00 

92 

LDY 

«0 

jHTAB 1 

606B:A9 17 

93 

LDA 

(123 

;VTAB 24 

606D :8D CI 60 

94 

STA 

TEMPI 

;salva VTAB 

6070:20 CI FB 

95 5TART4 

JSR 

BASCALC 

[trova la locazione 

6073:80 C3 60 

96 

LDA 

STRING,X 

[riceve il carattere 

6076:91 28 

97 

STA 

(BASL),Y 

[mette il carattere sullo schermo 

6078:20 B7 60 

98 

JSR 

CHECKX 

[controlla il puntatore della stringa 
jdecrementa VTAB 

607B:CE CI 60 

99 

DEC 

TEMPI 

607E:AD CI 60 

100 

LDA 

TEMPI 


6081:C9 00 

101 

CMP 

«0 

;e' alla semita' dello schermo? 

6083:00 EB 

102 

BNE 

START4 

;no, va avanti 

6085: 

103 « 




6085: 

104 * MUOVE 

IN ORIZZONTALE DA SINISTRA IN ALTO 

6085: 

105 « 




6085:A0 00 

106 

LDY 

trao 

[HTAB 1 

6087:A9 00 

107 STARTI 

LDA 

#$o 

[VTAB 1 

6089:20 CI FB 

108 

JSR 

BASCALC 

[trova la locazione 

608C:8D C3 60 

109 

LDA 

STRING,X 

[riceve il carattere successivo 

608F.-91 28 

110 

STA 

(BASL),Y 

[lo mette sullo schermo 

6091:20 B7 60 

111 

JSR 

CHECKX 

[controlla il puntatore della stringa 
[incrementa HTAB 

6094 :C8 

112 

INY 


6095:CO 28 

113 

CPY 

040 

je' al bordo dello schermo? 

6097:DO EE 

114 

BNE 

STARTI 

[no, va avanti 

6099: 

115 » 




6099: 

116 « IMPOSTA I 

PUNTATORI 

PER IL MOVIMENTO SEGUENTE 

6099: 

117 » 




6099:A5 08 

118 

LDA 

DIR 

[riceve la direzione della rotazione 

6098:C9 00 

119 

CMP 

«0 

[zero per il senso antiorario 

609D:F0 0E 

120 

BEO 

START9 

[qualsiasi altro per il senso orario 

609F :AE CO 60 

121 

LOX 

OLDBEG 

[riceve il punto iniziale della stringa 

60A2:E0 00 

122 

CPX 

DO 

[Fine della stringa? 

60A4: DO 03 

123 

BNE 

C0NT2 

;no, quindi la decrementa 

60A6:AE C2 60 

124 

LDX 

STRLEN 

[usa STRLEN come OLDBEG quindi 

60A9:CA 

125 C0NT2 

0EX 


[decrementa OLDBEG 

60AA:4C 83 60 

126 

JMP 

RETURN1 

[lo salva 

60AD:AE CO 60 

127 START9 

LOX 

OLDBEG 

[riceve il puntatore iniziale 

60B0:20 B7 60 

128 

JSR 

CHECKX 

[lo incrementa 

60B3:8E CO 60 

129 RETURN1 STX 

OLDBEG 

[salva il nuovo puntatore iniziale 

6086:60 

130 

RTS 


[return 

6087: 

131 * 




60B7: 

132 * INCREMENTA 

E CONFRONTA IL REGISTRO X 

60B7: 

133 * CON STRLEN 



60B7: 

134 * 




60B7:E8 

135 CHECKX 

INX 


[incrementa X 

60B8;EC C2 60 

136 

CPX 

STRLEN 

[e' maggiore della lunghezza della stringa? 

[no, return 

60BB:D0 02 

137 

BNE 

RETURN 

60BO:A2 00 

138 

LOX 

«0 

[si, imposta X a zero 

60BF: 60 

139 RETURN 

RTS 


[return 

60 CO: 

140 * 




60CO: 

141 * MEMORIZZAZIONE TEMPORANEA,BUFFER STRINGA 

60CO : 

142 * LUNGHEZZA STRINGA, 

PUNTATORE STRINGA 

60 CO: 

143 * 




6080:00 

144 0L0BEG 

OFB 

0 

[punta al punto iniziale della stringa 

60C1:00 

145 TEMPI 

OFB 

0 

[memorizzazione temporanea per A 
[lunghezza della stringa nel bufter 

60C2;1F 

146 STRLEN 

OFB 

31 

60C3: 

147 * 



60C3: 

148 * BUFFER STRINGA 


60C3: 

149 * 




60C3:AA A0 04 
60C6:C8 C5 A0 
60C9:03 D5 00 
60CC:C5 02 A0 
60CF:D3 00 C9 
6002:CE CE C5 
6005:02 A0 C4 
6008:C9 AO 03 
6008:04 C5 D6 
60DE:C5 A0 M 
60E1:A0 

150 STR1NG 

ASC 


THE SUPER SPINNER DI STEVE « 1 

«** SUCCESSFUL ASSEMBLY : NO ERRORS 
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■■ software di qualità 

J. SOft 

viale Restelli, 5 - 20124 Milano 
tei. 02/6888228-683797-6880841 -2-3 


L'acquisto di software originale significa-, garanzia di 
prodotto, possibilità di sostituzione 
anche nel caso di versioni aggiornate o di versioni 
nazionalizzate. Esigete sempre software originale. 

MICROSOFT 

Strumenti di lavoro 


Quando cercate un’informazione, Microsoft File 
la trova. Subito. File organizza nomi, numeri, 
disegni. Di uso immediato grazie alle capacità 
di Macintosh, File è un versatile e sofisticato 
database, completo di ricerca, riordino, report 
e menu esteso di aiuti sempre disponibili. 


La forma e la sostanza 


Disegnate i vostri record come vi pare: potrete 
poi cambiarli quando volete. Scegliete la forma 
più adatta per ogni dato. Scegliete le dimensio¬ 
ni della casella che lo contiene. Disponete i dati 
nel modo che vi sembra più pratico. Stabilite due 
formati diversi, ad esempio per la visione d’in¬ 
sieme e per un maggior dettaglio. Introducete 
testi, numeri e disegni. Nascondete i dati che non 
volete in vista. 


Costruitevi un formato di stampa, che potete 
usare anche con altri archivi. Stampate solo i 
dati che vi servono. Aggiungete e togliete campi 
ad archivi completi. Con File, siete liberi di pen¬ 
sare ai dati. Non al programma. 

File è completo 

File consente di preparare report riassuntivi dei 
dati selezionati, con somme, conteggi, medie ed 
altre funzioni. Di stampare i report nel formato 
desiderato. Di registrare il formato report per 
usarlo con altri archivi. Di usare i dati per lettere 
e circolari personalizzate con Microsoft Word. 
Di comunicare con Microsoft BASIC e con gli altri 
programmi Microsoft per il Macintosh. 

File archivia i dati. Voi li usate. 


sa 


do ire 







Listato 2 


10 REM ********************** 

20 REM * SPINNER.DEM01 * 

30 REM * DI STEVEN KEARNS * 

00 REM * COPYRIGHT (0 1985 * 

50 REM * BY APPLICANDO & * 

80 REM * MICROSPARC, INC » 

70 REM ********************** 

80 REM 

90 PRINT CHRi !4)'BL0AD SPItMER* 

100 MS = 20576: REM SPOSTA LA STRINGA NEL BUFFER 

110 SS = 20630: REM RUOTA LA STRINGA 

120 SL = 20770: REM LUNGHEZZA DELLA STRINGA 

130 ST = 20771: REM PRIMO CARATTERE DELLA STRINGA 

100 DIR = 8: REM DIREZIONE DI ROTAZIONE 

150 HOME : VTAB 12: PRINT SPC< 7)*S P I N N E R DEMO 1 

160 POKE DIR.O: GOSUB 790 

170 = "" 1 * CALL MS Al 

180 HOME : VTAB 12: HTÀB 0: PRINT 'DEMO DI UW STRINGA DI 2 
CARATTERI’ 

190 GOSUB 790 
200 HOME 

210 POKE 32,3: REM SPOSTA IL BORDO DELLO SCHERMO 
220 VTAB 3: PRINT 'PROVA QUESTO PICCOLO ESPERIMENTO.' 

230 PRINT : PRINT 'SEGUI UNO DEI PICCOLI ';: 11WERSE : PRIN 
T *•': NORMAL 

240 PRINT : PRINT 'ATTRAVERSO LO SCHERMO CON IL' 

250 PRINT : PRINT "DITO ALLA STESSA VELOCITA'. ADESSO' 

260 PRINT : PRINT 'FA ANDARE IL DITO NELL'ALTRA' 

270 PRINT : PRINT 'DIREZIONE ALLA STESSA VELOCITA'.' 

280 PRINT : PRINT 'ALLORA, IN CHE SENSO RUOTA’': TEXT 

290 GOSUB 790 

300 Al = * 1 # * • CALL MS Al 

310 HOME : VTAB12: HTAb'4: PRINT 'DEMO DI UNA STRINGA DI 4 
CARATTERI' 

320 GOSUB 790 

330 A» = '** SPIMER DI STEVE KEARNS ': CALL MS,Al 
340 HOME : VTAB 12: HTA8 4: PRINT "DEMO DI UNA STRINGA DI 3 
1 CARATTERI' 

350 GOSUB 790 

360 A* = 'QUESTO MESSAGGIO E' LUNGO ESATTAMENTE SESSANTADUE 
CARATTERI ++♦+++ ': CALL MS,Ai 
370 4; PR!ff l ' DEH0 DI UW STRINGA DI 6 

380 GOSUB 790 

385 REM IMPOSTA LA STRINGA = SPAZIO NORMALE 
390 Ai = ' ': CALL MS,Ai; POKE ST,160 
400 HOME : VTAB 10: HTAB 5: PRINT ‘FA SALIRE I TITOLI ALLA 
SOmiTA" 

410 VTAB 12: HTAB 5: PRINT 'CON STRINGHE DI 124 CARATTERI!' 
420 GOSUB 790: VTAB 22: CALL - B68 
430 : 

440 REM ROUTINE DI SALITA 
450 : 

460 Ai = 'TITOLO CENTRATO':L = LEN (Ai) / 2 

470 FOR X = 1 TO 124 - LEN <AÌ):AÌ = Ai ♦ ' ": NEXT X 

480 POKE DIR,1: CALL MS,Ai 


490 FOR R = 1 TO 104 - L: FOR PAUSE = 1 TO 60: NEXT PAUSE 
500 CALL SS: NEXT R 

510 VTAB 14: HTAB 5: PRINT 'LIST 440-500 PER ROUTINE SALITA 

R 

520 VTAB 20: HTAB 3: PRINT '(0 1985 BY APPLICANDO 4 MICROS 
PARC':: PRINT : VTAB 22: HTAB 3: PRINT 'PREMI LA BARRA 
SPAZIO PER CONTINUARE' 

530 X = PEEK ( - 16384) 

540 IF X = 160 THEN POKE - 16368,0: GOTO 560 
550 GOTO 530 
560 : 

570 REM MESSAGGI SPECIALI 
580 : 

590 HOME 
600 : 

610 REM N = 1 PER MESSAGGIO NORMALE 

620 REM F = 1 PER MESSAGGIO LAMPEGGIANTE 

630 : 

640 N = 1:F = 0:A1 = V STRINGA NORMALE 31 CARATTERI //': G 
OSUB 860 

650 VTAB 12: HTAB 13: PRINT 'MESSAGGI NORMALI' 

660 GOSUB 790 

870 N = 0:F = 1:A4 = 'SONO POSSIBILI MESSAGGI LAMPEGGIANTI- 
': GOSUB 860 

680 HOME : VTAB 12: HTAB 11: PRINT 'MESSAGGI LAMPEGGIANTI' 
690 GOSUB 790 

700 Ai = ' COMBINA MODI ': CALL MS,Ai 
710 POKE ST,160 

720 HOME : VTAB 12: HTAB 4: PRINT 'ANCHE LE COMBINAZIONI SO 
NO FACILI 1 ' 

730 GOSUB 790 

740 Ai = '** SPINNER DI STEVE KEARNS ': CALL MS,Ai 
750 HOME : VTAB 12: HTAB 13: PRINT 'BUONA ROTAZIONE 1 ' 

760 GOSUB 790 
770 HOME : END 
780 : 

790 REM SUBROUTINE ROTAZIONE 
800 : 

810 VTAB 20: HTAB 3: PRINT '(C) 1985 BY APPLICANDO 4 MICROS 
PARC':: PRINT : 'VTAB 22: HTAB 3: PRINT 'PREMI LA BARRA 
SPAZIÒ PER CONTINUARE' 

820 FOR PAUSE = 1 TC 60; NEXT PAUSE 

830 X = PEEK <- 16384): POKE -16368,0 

340 IF X = 160 THEN RETURN 

S50 CALL SS: GOTO B20 

860 : 

870 REM INTRODUCE MESSAGGI LAMPEGGIANTI E 
880 REM NORMAL] 

890 : 

900 IF N = 1 THEN A = 64 

910 IF F = 1 THEN A = 0 

920 FOR X = 1 TO LEN (Ai) 

930 Bi = MI Di (AÌ,X,1) 

940 IF Bi ) '?' THEN 960 

950 Z = ASC (Bi) + 64 + A: GOTO 970 

960 Z = ASC (Bi) * A 

970 POKE ST ♦ X - 1,2: NEXT 

980 POKE SL, LEN (Ai) 

990 RETURN 


routine. La subroutine più importante 
usata nel programma, BASCALC, 
calcola la locazione di buffer schermo 
di una riga specificata dall’accumula¬ 
tore. 

La routine CHKCOM non fa che 
controllare la stringa immessa per ve¬ 
dere se ci sia una virgola. Se questa 
viene trovata è rimossa e il programma 
continua. Se non c’è virgola sarà se¬ 
gnalato un SYNTAX ERROR. 
PTRGET riceve la lunghezza e la loca¬ 
zione di memoria della stringa immes¬ 
sa, o per meglio dire riceve il descritto¬ 
re della stringa immessa. 

I primi 48 byte del programma tra¬ 


sferiscono nel buffer dello Spinner la 
stringa immessa per due ragioni: pri¬ 
mo, perché la variabile della stringa 
immessa possa essere usata di nuovo, 
e secondo perché nel caso in cui venga 
emesso un FRE (O) la stringa non ven¬ 
ga accidentalmente cancellata. Que¬ 
sto è il primo punto d’introduzione 
dello Spinner e deve essere usato ogni 
volta che si desidera una nuova strin¬ 
ga- 

I cinque byte successivi non fanno 
che azzerare l’indice di stringa, OLD- 
BEG. Questo indice punta il carattere 
della stringa che sarà visualizzato per 
primo. 


Ogni volta che il messaggio viene 
spostato questo puntatore è incremen¬ 
tato o decrementato, a seconda della 
direzione di rotazione. In realtà, quin¬ 
di, il messaggio sullo schermo non si 
muove; viene invece visualizzato con 
diversi punti d’inizio. 

Ogni modulo della rotazione è chia¬ 
ramente marcato nel listato del pro¬ 
gramma in relazione alla sezione dello 
schermo con cui il programma sta la¬ 
vorando al momento. Il messaggio 
viene visualizzato una sezione alla vol¬ 
ta, con il lato destro per primo e la 
sommità per ultima. 

Le linee 118—130 controllano dap- 
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Listato 3 


10 

REM #»*##*######*##«*#*##*» 


20 

REM * SPINNER.DEM02 * 


30 

REM * DI STEVE KEARNS * 


40 

REM * COPYRIGHT <C) 1985 * 


50 

REM » BY APPLICRNDO 4 * 


60 

REM * MICROSPARC, INC * 


70 

REM *#*##*###»#*#**#*#«*#»# 


80 

PRINT CHRt >:4)"BLOAD SPINNER' 


90 

HOME 


100 

POKE 24770,2: REM NUMERO DEI CARATTERI NELLA STRINGA 


110 

POKE 24771,32: REM SPAZIO 


120 

POKE 24772,160: REM SPAZIO INVERSO 


130 

CALL 24624: REM REIMPOSTA INDICI E MUOVE IL MESSAGGIO 

UNA VOLTA 


140 

POR X = 1 TO 500: FOR Y = 1 TO 90: NEXT Y: CALL 24630: 

NEXT X 


Listato 4 

#6000 

.60E2 







6000- 

20 

BE 

DE 

20 

E3 

DE 

AO 

00 

6008- 

B1 

83 

8D 

C2 

60 

C8 

B1 

83 

6010- 

85 

06 

C8 

B1 

83 

85 

07 

AO 

6018- 

FF 

C8 

81 

06 

1S 

C9 

3F 

FO 

6020- 

07 

90 

05 

09 

80 

38 

E9 

CO 

6028- 

99 

C3 

60 

cc 

C2 

60 

DO 

E9 

6030- 

A9 

00 

8D 

co 

60 

60 

AO 

27 

6038- 

AE 

co 

60 

A9 

01 

8D 

CI 

60 

6040- 

20 

CI 

FB 

BD 

C3 

60 

91 

28 

6048- 

20 

87 

60 

EE 

CI 

60 

AD 

CI 

6050- 

60 

C9 

18 

DO 

EB 

A9 

17 

20 

6058- 

CI 

FB 

AO 

26 

BD 

C3 

60 

91 

6060- 

28 

20 

B7 

60 

88 

CO 

00 

00 

6068- 

F3 

AO 

00 

A9 

17 

8D 

CI 

60 

6070- 

20 

CI 

FB 

BD 

C3 

60 

91 

28 

6078- 

20 

87 

60 

CE 

CI 

60 

AD 

01 

6080- 

60 

C9 

00 

DO 

EB 

AO 

00 

A9 

6088- 

00 

20 

CI 

FB 

BD 

C3 

60 

91 

6090- 

28 

20 

B7 

60 

C8 

CO 

28 

DO 

6098- 

EE 

A5 

08 

C9 

00 

FO 

OE 

AE 

60A0- 

CO 

60 

EO 

00 

DO 

03 

AF 

C2 

60A8- 

60 

CA 

4C 

B3 

60 

AE 

CO 

60 

6080- 

20 

87 

80 

8F 

CO 

60 

60 

E8 

6088- 

EC 

C2 

60 

DO 

02 

A2 

00 

60 

60CO- 

00 

00 

1F 

AA 

AO 

D4 

CB 

C5 

60C8- 

AO 

D3 

D5 

DO 

C5 

D2 

AO 

D3 

6000- 

DO 

C9 

CE 

CE 

C5 

D2 

AO 

C4 

60D8- 

C9 

AO 

D3 

D4 

C5 

D6 

C5 

AO 

60E0- 

AA 

AO 

00 







prima la direzione della rotazione. 
Quando la direzione è stata determi¬ 
nata il programma regola OLDBEG e 
accerta che OLDBEG sia ancora en¬ 
tro la lunghezza del messaggio. 

Le linee 135-139 non fanno che in¬ 
crementare il registro X senza supera¬ 
re la lunghezza del messaggio. 

L’accumulatore viene usato in con¬ 
tinuazione come posizione verticale e 
per trasferire i dati dal buffer allo 
schermo. 

Il registro X viene usato come indice 
per puntare il successivo carattere da 
visualizzare, mentre il registro Y è la 
posizione orizzontale. 


Applicazioni 
e modifiche 

Sarebbe errato pensare che lo Spin- 
ner sia soltanto un programma curioso 
senza concreta utilità. Un impiego 
molto pratico potrebbe essere quello 
di pittoreschi menù. La subroutine che 
comincia a linea 810 nel programma 
dimostrativo mostra come si possa te¬ 
nere Spinner in movimento control¬ 
lando al tempo stesso la tastiera per la 
pressione dei tasti. Il loop di pausa 
deve essere modificato per ogni menù 
differente perché il numero dei passi 
sarà diverso. Il menù del programma 
dimostrativo accetta solo un carattere, 
la barra spaziatrice. 

Se non premete la barra il program¬ 
ma conterà da 1 a 50, farà CALL MS 
(spostamento della stringa) e poi cer¬ 
cherà nuovamente la barra spazi. I 
menù che controllano vari caratteri 
differenti richiederanno un loop di ri¬ 
tardo più breve. Provate a farlo! 

Le potenziali modifiche dello Spin¬ 
ner sembrano infinite. Qui è presenta¬ 
ta la versione più semplice e più prati¬ 
ca. Un’altra versione possibile terreb¬ 
be la stringa in movimento da sola fino 
alla pressione di un tasto specificato. 
Altre idee sono quelle di un program¬ 
ma di rotazione con confini definibili, 
o di una routine incorporata di sposta¬ 
mento della stringa che converta le 
stringhe in lampeggianti, normali o in¬ 
verse. Con lo Spinner le potenzialità 
sono immense. 


Questo programma è disponibile su 
dischetto. L'elenco, i prezzi e le 
modalità d'ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 
- 
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IBM 
Apple 

Macintosh 

floppy 

software 

accessori 

periferiche 

compatibili 

Distribuiti in Italia 
con garanzia Italiana 
ai prezzi più bassi. 

do: C. RfìGG IOs n c 

56030 F'erignono pi Vio Spinelli 8 
tei. 0587-616207 

RIcuni esempi : 

Apple //e originale 090.000 
idem prodotto Itolio 635.000 

sch.BO col +64k originale 351.000 
idem c.s. prodotto Italia 70.000 

interfaccia seriole orig. 150.000 
idem c.s. prodotto Itolia 125.000 


duodisk originale 
idem c s prodotto itolia 
drive ogg.compatib.//c 
mouse originale c/man. 
monitor //e originale 


799.000 
545 000 
365.000 
169.000 
259.500 

3.390 

8.475 


floppy 5"e1 /4 
rnicrofloppy 3" e 1/2 
IBM XT compatibile prodotto Itolia 
XT 256k rom e 1 drive 1 .849 000 
idem c.s. con 2 drive 2.129.000 
c.s. con HD 10 mego 3.409 000 
c.s. con HD 20 mego 4.290.000 

... e tante altre cose a 
condizioni favolose . 

prima di o g ni acquisto . 
senti le ns. proposte . . . 
da noi spendi meno! 

Listino completo inviondo 4.000 lire 
o con lo primo fornitura. 

Materiali consegnati a domicilio con 
garonzio 12 mesi completo e clousolo 
SODDISFATTO 0 RIMBORSATO 
entro otto giorni 

Sconti per quantità 

I prezzi non compirendono l’I.V.A. 

IBM é un morchie reg.lBM cor por 
Apple , Duodisk, Macintosh, sono 
marchi di opple computer ine 
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"Ovunque mi compri 
sono garantito 
un anno, ma solo 

la SALS INFORMATICA 

mi assiste gratuitamente 
a casa”. 


L'offerta è valida per 
tutti i sistemi APPLE 
venduti dalla 
SALS INFORMATICA, 
a Genova, a partire 
dal 31 marzo 1985. 






[appiè computar 


Oliata 

Informatica 


_B0 



Via C. D’Annunzio, 2-35 Genova - Tel. (010) 58.93.27 


Centro dimostrativo Sals Informatica 
Viale Brigate Partigiane, 132 R. Genova 



guida .-stampanti 


Come si deve scegliere la stampante? Le caratteristiche da 
considerare sono molte, e spesso accade che un modello ne 
soddisfi alcune, un modello altre... Cominciamo con l’esaminare 
quali e quanti sono i tipi di macchine esistenti: ad aghi, a 
margherita, a trasferimento termico, a getto d’inchiostro e a laser; 
vediamone le prestazioni, i costi, le compatibilità; e poi gli 
accessori, i manuali, il software... Una rassegna completa e 
corretta, corredata da mille notizie utili e, soprattutto, da una 
tabella comparativa che, per testare tutte le macchine citate, è 
costata 600 ore/uomo di lavoro redazionale 


Universo stampa 



U n’immagine vale più di mille pa¬ 
role. Questa frase può spiegare a 
un utente qualsiasi di personal compu¬ 
ter quanto importante possa diventare 
il fatto di presentare la stampa di un 
lavoro ben fatto. Tabelle di spread¬ 
sheet, grafici, relazioni, disegni, eti¬ 
chette eccetera sono i lavori che spesso 
richiedono l'utilizzo della periferica 


più importante e più venduta: la stam¬ 
pante. 

L’automatizzazione rivoluziona 
l’interno degli uffici e sta imponendosi 
alle tradizionali macchine per scrivere 
e fotocopiatrici, sostituite da stazioni 
di videoscrittura o da personal compu¬ 
ter (PC) dotati di pacchetti dedicati al 
Word Processing e completati magari 


da inseritori di fogli singoli automatici, 
e altri accessori, in grado di sveltire e 
facilitare tutta la gestione cartacea. 

Oggi sul mercato sono presenti di¬ 
verse marche, ognuna delle quali pos¬ 
siede più modelli, in grado di accon¬ 
tentare le richieste più svariate: dalla 
stampa ad altissima qualità per i testi, 
alla stampa mista di testi e grafica in 




I 
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Stampanti ad aghi 



plot mode (in grado di riprodurre un 
disegno con la stessa qualità di un plot- 
ter); in mezzo a tanta abbondanza si 
corre spesso il rischio di non saper cosa 
decidere, e di finire magari con l’ac¬ 
quistare una stampante che poteva 
sembrare la soluzione ottimale ma che 
alla fine non soddisfa. Per questo mo¬ 
tivo Applicando ha sentito l’esigenza 
di vedere in dettaglio quello che il 
mercato può mettere a disposizione 
dei vari utenti, grandi e piccoli, per 
studiarne le caratteristiche, mettere a 
fuoco le diverse capacità e proporre ai 
lettori una tabella, non tanto per com¬ 
porre graduatorie di merito, che ci 
sembrano inutili e dannose, ma per 
chiarire le idee su un eventuale acqui¬ 
sto o utilizzo. 

Vediamo innanzitutto come si pos¬ 
sono collegare le stampanti ai vari PC. 
Normalmente vengono utilizzate delle 
schede, dette "interfacce", da inserire 
aH’interno della piastra base del com¬ 
puter, che vengono collegate alla 
stampante attraverso un cavo. Queste 
interfacce hanno il compito di decodi¬ 
ficare e ottimizzare i segnali inviati dal 
computer in modo che la stampante 
esegua quanto viene richiesto dal pro¬ 
gramma; normalmente i protocolli ri¬ 
conosciuti dalle stampanti sono due: 
quello "parallelo" e quello "seriale 
RS-232C". Ogni carattere, come ben 
si sa, è composto da 8 bit, ed essi ven¬ 
gono inviati alla stampante, in entram¬ 
bi i protocolli, secondo lo standard 
ASCII; ma mentre con un’interfaccia 
e con un cavo paralleli gli 8 bit di un 
carattere viaggiano su 8 fili contempo¬ 
raneamente, con un’interfaccia e un 
cavo seriali gli 8 bit viaggiano uno die¬ 


tro l’altro su un unico filo. Apparente¬ 
mente, quindi, il protocollo parallelo 
può sembrare più veloce di quello se¬ 
riale; tuttavia le interfacce seriali pos¬ 
sono essere regolate in modo tale che i 
segnali siano inviati con una velocità 
variabile tra i 300 e i 19200 bps, perciò 
molto rapidamente. 

Evidentemente una stampante pa¬ 
rallela non potrà essere collegata a un 
PC con un'interfaccia seriale, e vice¬ 
versa, a meno di non introdurre in 
mezzo alle due macchine degli adatta¬ 
tori particolari. 


È la categoria di stampanti più diffu¬ 
sa nel mondo, e si tratta di macchine 
dove la stampa avviene carattere per 
carattere. Gli aghi di scrittura (figura 
1) sono montati all’interno di un bloc¬ 
co detto "testina", la quale a sua volta è 
montata su di un carrello capace di 
muoversi a velocità costante sulla riga 
da stampare. Il tutto è comandato da 
un motore che viene guidato da appo¬ 
siti circuiti che decifrano i segnali della 
parte logica della stampante. Comple¬ 
tata la stampa di una riga, la carta 
viene fatta avanzare alla riga successi¬ 
va da un altro motore, detto "passo 
passo", che controlla il rullo, e la testi¬ 
na può ricominciare a scrivere dalla 
posizione più opportuna, se la stampa 
è "bidirezionale ottimizzata", oppure 
ricomincia dall’inizio della riga se la 
stampa è monodirezionale. 

La testina, come già detto, contiene 
un numero variabile di aghi, disposti 
su una o più file; essi sono azionati da 
piccoli elettromagneti, da cui vengono 
proiettati su un supporto inchiostrato: 
in tal modo si ottiene una serie di punti 
che compongono la stampa di un ca¬ 
rattere o di un disegno. Ogni caratte¬ 
re, quindi, è composto da una griglia 
di punti (figura 2) detta "matrice" che 
influenza molto la qualità di stampa; 
infatti il numero degli aghi racchiusi 
nella testina e la densità della matrice 
sono i parametri che diversificano la 
qualità di una stampante. Una matrice 


Matrice 7x9 punti 


i i Direzione di sposta¬ 
mento della carta 



Figura 2. Stampanti ad aghi: la matrice, cioè la griglia di punti che 
compone ogni carattere, determina ia qualità di stampa. 


■ 
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guida stampanti 


Carta Termica o Termosensibile 



Microresistenze/ 


Figura 3. 

Stampanti termiche: 
nella testina, 
al posto degli aghi, 
c’è una serie di 
microresistenze. 


Strato trattato chimicamente 
per fissare i componenti colorati 



Supporto della Carta 


di 7x9 punti produrrà una stampa qua¬ 
litativamente migliore di una stam¬ 
pante che abbia una matrice di 5x7 
punti. 

Oggi si è arrivati a costruire testine 
capaci di stampare con una definizione 
molto alta, detta "Near Letter Quality" 
(NLQ), che si avvicina di molto alla 
qualità di una macchina per scrivere; e 
forse pochi sanno che attualmente l’I¬ 
talia è uno dei più grossi leader mon¬ 
diali del settore. 

La fetta di mercato occupata dalle 
stampanti ad aghi è la più grossa, per 
la presenza di svariate marche e di più 
modelli; questo successo è dovuto a 
una tecnologia migliore rispetto a 
qualche anno fa, che è in grado di for¬ 
nire stampanti sempre più robuste e 
affidabili, in grado di utilizzare carta 
comune, con una velocità di stampa 
che può raggiungere i 400 caratteri al 
secondo, dove il cambio del nastro 
non richiede l’intervento del tecnico 
specializzato, capaci di stampare la 
grafica più raffinata, ma soprattutto 
facili da utilizzare. 

Stampanti termiche 

Queste stampanti sono tra le più 
economiche presenti sul mercato, e 
anch’esse, come le stampanti ad aghi, 
stampano carattere per carattere rico¬ 
struendolo su una matrice. Le stam¬ 
panti termiche si dividono in due gran¬ 
di gruppi: quelle che adoperano carta 
termosensibile, e quelle che stampano 
su carta comune ma con un nastro ter¬ 
mosensibile. 

Per tutt’e due i tipi la tecnica di ge¬ 
stione della testina e il controllo dell’a¬ 
vanzamento della carta sono simili a 
quelli visti per le stampanti ad aghi, da 
cui si differenziano per il modo di pro¬ 


duzione dell’immagine su carta. 

Le stampanti termiche che adopera¬ 
no carta termosensibile racchiudono 
nella testina una serie di microresi¬ 
stenze (figura 3), che prendono il po¬ 
sto degli aghi; queste microresistenze, 
opportunamente eccitate, vanno a col¬ 
pire lo strato termosensibile della car¬ 
ta speciale e la "bruciano" lasciando in 
corrispondenza un punto nero: così 
viene stampato il carattere o il dise¬ 
gno. 


Le stampanti a nastro termico, inve¬ 
ce, possono utilizzare carta comune 
(meglio se di qualità); anche in esse 
(figura 4) la testina racchiude una se¬ 
rie di microresistenze che, al contrario 
del primo tipo che non usa nastro, op¬ 
portunamente eccitate interagiscono 
col nastro e ne fondono l’inchiostro 
sulla carta andando a formare il carat¬ 
tere o il disegno voluto. 

In entrambe si possono avere testi¬ 
ne con matrici molto ben definite, fino 


Dall’de alla zeta per Apple 

• Disk drive da 640 K formattati per sistemi operativi DOS 3.3*, ProDos*, Pascal*, CP/M* 

• Controller per due disk drives da 640 K o da 143 K 

• AM 10 buffer programmabile (spooler) da 64 a 256 K 

• Interfaccia Macintosh*/Apple Ile* - stampante grafica standard Centronics* 

• Espansioni di memoria da 128 K RAM, gestiti con disco virtuale 

• marchi registrati _ 

In vendita presso i migliori P3 /^©[EKtOspa 

computer Shop Buia/Ud tei. 0432-961014 TIx 450608 
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Nastri 

Per chi ha una stampante laser il problema è il toner. Per la stragrande 
maggioranza, invece, la nitidezza delia stampa dipende dal nastro. In genere 
le case produttrici di stampanti sono in grado di fornire anche il supporto 
inchiostrato (Apple in testa) ma anche altre aziende di prodotti ausiliari per 
centri Edp sono in grado di offrire gamme di nastri. La società per azioni 
Incas fa proprio di questo prodotto il suo cavallo di battaglia. Come anche la 
Geha, società tedesca di inchiostri e cancelleria. I suoi prodotti sono impor¬ 
tati e distribuiti in Italia dalla Data Base. Anche la Datamatic e la Mee 
distribuiscono differenti versioni di nastri per le diverse esigenze di mercato 
mentre, prodotto curioso, la Paolini di Roma distribuisce nastri colorati che 
permettono la stampa su magliette e stoffa in genere. 



Alcuni nastri per stampante prodotti dalla GEHA. 


a 32x26 punti, e quindi si può ottenere 
una buona qualità di stampa, ma sono 
casi limite; inoltre l’assenza di parti 
meccaniche, escludendo il sistema di 
scorrimento della testina e dell’avan¬ 
zamento della carta, le rende partico¬ 
larmente silenziose, leggere ed econo¬ 
miche. 

Anche se i lati positivi di questo tipo 
di stampante sono molti, vi sono degli 
aspetti meno positivi che non bisogna 
trascurare. Il primo consiste nel dover 
adoperare carta speciale, meglio se 
quella consigliata dalla casa madre, 
non sempre di facile reperimento e 
molto spesso costosa; oppure di dover 
usare nastri speciali o particolari car¬ 
tucce inchiostrate costose, di vita bre¬ 
ve e molto difficili da sistemare nei 
loro alloggiamenti. Inoltre non è pos¬ 
sibile utilizzare carta carbone o carta 
chimica per ottenere copie multiple. 

Tuttavia queste stampanti sono un 
buon compromesso per chi non deve 
stampare una grande mole di dati o 
per chi non fa del proprio PC un uso 
strettamente professionale, soprattut¬ 
to per il loro basso costo. 

Stampanti 
a margherita 

Sono le regine incontrastate, per il 
momento, degli uffici dove viene ri¬ 
chiesta un'alta qualità di stampa per 
quanto concerne la produzione di do¬ 
cumentazione su carta. 

La tecnica di stampa usata prevede 
la realizzazione di caratteri pieni, così 
come avviene nelle tradizionali mac¬ 
chine per scrivere, attraverso l’uso di 
una "margherita"; essa non è altro che 
un disco di metallo o di plastica, su cui 
sono disposti dei petali (figura 5), 
ognuno dei quali contiene un caratte¬ 
re. Quando arriva un segnale di stam¬ 
pa, viene eccitato un elettromagnete 
che spinge un martelletto contro il pe¬ 
talo desiderato, che a sua volta batte 
contro un nastro inchiostrato e produ¬ 
ce sulla carta il carattere; il petalo pre¬ 
scelto viene selezionato attraverso la 


sincronizzazione di un dispositivo 
meccanico che fa ruotare la margheri¬ 
ta sull’asse passante per il suo centro. 

La qualità di stampa che si ottiene 
da queste stampanti è senz’altro otti¬ 


ma, e in certi casi superiore a quella 
che si otterrebbe da una macchina per 
scrivere. Tuttavia vi sono due aspetti 
che vale la pena di sottolineare. Innan¬ 
zitutto l’impossibilità della gestione 
della grafica, e quindi della produzio¬ 
ne di diagrammi o grafici di qualsiasi 
tipo; e poi il fatto che se si vuol cam¬ 
biare tipo di carattere all’interno di 
uno stesso testo bisogna intervenire 
manualmente per sostituire la mar¬ 
gherita con un’altra, bloccando la 
stampa temporaneamente. 

In ogni caso esse si presentano come 
le Rolls-Royce del settore, anche nel 
prezzo, ma possono disporre di svaria¬ 
ti accessori; ne ricordiamo uno tra tut¬ 
ti: l’inseritore automatico di fogli sin- 


Modulo continuo 

Forse non tutti sono a conoscenza del fatto che nell’Associazione nazio¬ 
nale Italiane industrie grafiche cartotecniche e trasformatrlci esiste, a livello 
nazionale, un Gruppo produttori moduli continuo. Il G.P.M. è una libera 
aggregazione di imprenditori con lo scopo di promuovere e favorire azioni 
collettive per diffondere il consumo dei moduli continui e prestare agli 
associati la consulenza necessaria. Le aziende associate rappresentano il 
75% della produzione del settore. In testa la società per azioni Step, che 
fornisce qualsiasi supporto cartaceo su modulo continuo. Per gli auguri 
natalizi aziendali, l’ultima proposta sono delle cartoline personalizzate su 
modulo continuo. 
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LO STESSO LAVORO PUOI 

PRESENTARLO 


BENE O 


Milano, 17 Luglio 1985 


DA Mario Bianchi (Direttore Vendite) 
A Gianni Rossi (Direttore Generale) 


L'andamento delle vendite nel corso di quest'anno nello stato del 
Colorado per quanto riguarda il prodotto A ha subito un calo rispetto 
all'andamento delle vendite dei prodotti B, C, D ed E Infatti ne sono stati 
venduti soltanto 1200 pezzi, nonostante le previsioni di vendita all'Inizio 
dell'anno fossero tutt altro che negative 

Purtroppo stiamo assistendo ad una crisi del settore che si riuscirà' a 
risolvere solo con azioni di politica economica che esulano dalla nostra 
area di intervento infatti, la popolazione di Denver e' In calo e cosi' anche 
i consumi alimentari ne hanno risentito 

Nonostante comunque l andamento del mercato sia poco favorevole, il 
bilancio complessivo è da giudicarsi positivamente Con sacrifici ed 
un'attenta gestione operativa, abbiamo ridotto il nostro intervento nel 
segmenti meno redditizi, aumentando gli sforzi di vendita del prodotto D 
che cosi risulta quello che maggiormente ha contruibulto all'utile 
aziendale 

Sperando di poter riportare risultati più brillanti anche dalle vendite, 
non appena ripartirà 11 mercato. Invio cordiali saluti 

Mario Bianchi 



Ogni giorno vengono stilati migliaia di 
rapporti aziendali. La maggior parte viene 
sottoposta all'approvazione, alcuni vengono 
letti, pochi discussi, pochissimi vengono 
ricordati. Tutti gli strumenti di cui hai bisogno 
per ottenere business report indimenticabili, li 
puoi trovare su un solo dischetto: Ensemble. 
Ensemble riunisce il trattamento testi, la 
gestione dati, l'impostazione e la creazione 
di report, il calcolo e la grafica in un solo 
programma molto potente e produttivo. Il 
miglior pregio di Ensemble è la sua facilità. 
Studiato pensando a te e al tuo computer 
preferito, il Macintosh anche con solo 128K, 
Ensemble sfrutta tutti i vantaggi del 
Macintosh User Interface ed è compatibile 
con MacWrite e MacPaint. Ma questo non è 
il solo modo in cui Ensemble ti aiuta a 
migliorare. Puoi utilizzare Ensemble anche 
per creare Databases, effettuare analisi 
decisionali, fare mailing e altro ancora. 

Fatti ricordare con Ensemble. Fissa un 
appuntamento oggi stesso con il tuo software 
dealer oppure telefona, senza alcun impegno, 
a Italware a questo numero: 02-21623606. 


DA Mario Bianchi (Direttore Vendite) 
A Gianni Rossi (Direttore Generale) 



Prod. C Prod. D 




Ensemble 
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Movimento 



Figura 4. Stampanti termiche: anche i modelli a nastro si basano sulle 
microresistenze contenute nella testina. 


Nastro Termosensibile 

(1 Carta Comune 



Per velocizzare i tempi di stampa e 
liberare subito la memoria del 
computer si può usare il buffer GPA 
727 della Delin. 



I buffer 

Le stampanti sono le periferiche 
più lente di un sistema di elaborazio¬ 
ne dati. Per minimizzare questo in¬ 
conveniente, e quindi i costi com¬ 
plessivi dell'elaborazione, è vantag¬ 
gioso utilizzare un buffer per la 
stampante. Con l’impiego del buffer, 
il computer può mandare in stampa 
e rapidamente riprendere a fare del- 


goli, in grado di dare nel suo insieme 
risultati eccezionali. 

Stampanti a getto 

Sono stampanti ad alta qualità con 
una definizione che può raggiungere i 
192x96 punti per pollice. Sfruttano de¬ 
gli accorgimenti tecnologici all’avan¬ 
guardia che le rendono rapide e asso¬ 
lutamente silenziose, e che richiedono 


l'altro, per esempio proseguire nel 
programma o addirittura mandare 
dati a un’altra stampante. Ecco i buf¬ 
fer per stampanti attualmente sul 
mercato: 

• 8K Centronics, 280.000 lire più 
IVA, è prodotto dalla Pertel. 

• GPA 727. Gestito interamente da 
microprocessore, ha una capacità 
di 64K ed è disponibile anche per 
porta Centronics o RS232/C. Il costo 
è di 365.000 lire per il modello 64K e 
di 320.000 lire per il modello 32K per 
Centronics. È prodotto da Delin. 

• Buffer con ingresso Centronics o 
seriale RS232 con capacità da 8K 
fino a 64K, alimentati direttamente 
dalia stampante o con alimentazio¬ 
ne propria. Prezzi da 250.000 lire in 
su. Sono prodotti da Elcom. 

• AM 05. E una serie di buffer da 8 a 
64K per stampanti parallele, alimen¬ 
tati da 220 volt e forniti di cavo e 
connettore. Il costo per il modello 
base è di 260.000 lire. Prodotto da 
Asem. 

• AM 10. Serie di buffer di grande 
capacità: da 64K espandibili fino a 
356, con funzioni di Pause, Hold, Co¬ 
py, Reprint, Skip e Clear. Possono 
avere ingresso e uscita sia in seriale 
che in parallelo e connettere due 
stampanti con il modulo sdoppiato¬ 
re. Il modello base costa 767.000 li¬ 
re, il produttore è ancora Asem. 


una manutenzione del tutto minima. 

La tecnica di stampa con cui si ottie¬ 
ne il carattere stampato prende spunto 
dal fenomeno fisico della deflessione 
di particelle aventi una carica elettro- 
statica all’interno di un campo elettro- 
magnetico intenso. Infatti la testina, 
che contiene anche la cartuccia con il 
serbatoio di inchiostro liquido, prov¬ 
vede a convogliare le particelle d’in¬ 
chiostro attraverso una piccola pompa 
(figura 6) all’interno di una "camera" 


che contiene un cristallo piezoelettri¬ 
co; esso, opportunamente eccitato, 
carica elettrostaticamente le particelle 
d’inchiostro, che passano quindi attra¬ 
verso un generatore di caratteri e poi 
attraverso due schermi caricati elet¬ 
trostaticamente che servono a creare 
un campo elettromagnetico costante. 
A questo punto le particelle vengono 
deflesse durante l’attraversamento di 
questo campo elettromagnetico e sono 
"sparate" sulla carta in modo tale da 
formare il carattere da stampare, gra¬ 
zie all’azione del campo elettromagne¬ 
tico sulla carica elettrica che viene re¬ 
golato dalla parte logica della macchi¬ 
na e dalla struttura della matrice. La 
composizione del carattere viene ef¬ 
fettuata lungo l’asse verticale durante 

10 spostamento, lungo l’asse orizzon¬ 
tale, della testina. 

Anche per questa macchina tuttavia 
vi sono piccoli appunti da fare quali 
l’impossibilità di eseguire buone stam¬ 
pe su etichette, in quanto l’inchiostro 
non viene assorbito bene; inoltre la 
stampa in grassetto alcune volte può 
provocare delle macchie e soprattutto 

11 fatto che l’inchiostro tende a seccarsi 
se la cartuccia non viene utilizzata con¬ 
tinuamente; ma al di là di questi picco¬ 
li inconvenienti, è innegabile che le 
stampanti a getto d’inchiostro sono 
delle buone periferiche per produrre 
documentazione cartacea di qualità. 

Stampanti laser 

Da pochi anni è disponibile anche 
per il mercato dei personal computer 
un tipo di stampante che fa uso di un 
raggio laser per la formazione dell’im¬ 
magine. I grandi centri di elaborazio¬ 
ne sono dotati da tempo di tali unità di 
uscita che, naturalmente, hanno di- 
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Pulizia 

Il detersivo rovina le superfici, l’alcool non va bene, l’acqua non è suffi¬ 
ciente. Per la pulizia delle superfici elettrostatiche come quelle dei computer 
o delle stampanti l'ideale sono dei particolari detergenti creati a questo 
scopo. Presso tutti i negozi Buffetti e nei migliori computer shop è possibile 
trovare la linea Safe della Ape. Della serie Vpc della Verbatim il kit 406 è 
anch’esso destinato alla pulizia delle stampanti. Dalla Wright Line Santal, 
invece, un set universale per pulire tutte le superfici elettrostatiche. Infine, la 
Sedagraf fornisce fazzolettini tuttofare. 


mensioni, velocità e costo (superiore 
ai cento milioni) tipici del mondo dei 
mainframe. 

Non più ingombranti di una fotoco¬ 
piatrice da tavolo e talmente silenziose 
da non disturbare una conversazione 
sussurrata, le stampanti laser si posi¬ 
zionano sia per la qualità di stampa sia 
per il prezzo al di sopra degli altri tipi 
di stampante. Trovano la loro naturale 
collocazione in tutti quei casi in cui 
l’aspetto della stampa è di primaria 
importanza. 

I modelli più popolari presenti in 
Italia sono: HP LaserJet, Apple La¬ 
serWriter e Canon LBP-8. Queste tre 
stampanti, pur avendo possibilità di 
impiego assai differenti fra loro, si ba¬ 
sano tutte su una parte comune, costi¬ 
tuita dalla meccanica vera e propria, 
che è prodotta dalla Canon. Ecco per¬ 
ché alcune delle caratteristiche intrin¬ 
seche (risoluzione, numero di copie al 
minuto, carico di lavoro mensile, si- 
lenziosità, affidabilità) sono perfetta¬ 
mente identiche fra i tre modelli. Le 
diversità, legate soprattutto alle pre¬ 
stazioni, derivano da ciò che i vari co¬ 
struttori hanno aggiunto in termini di 
hardware e di software al modulo di 
base. 

Una stampante laser nasce dall’in¬ 
contro fra tre diverse tecnologie: 

• il laser per la formazione deU’imma- 
gine; 

• la xerografia per fissare l’immagine 
sulla carta; 

• l’elettronica (nel caso della Laser 
Writer Apple si tratta addirittura di un 


potente computer) per il controllo del¬ 
le operazioni e il collegamento all’ela¬ 
boratore. 

Il modulo di base comune ai tre mo¬ 
delli, detto "motore di stampa", fa uso 
di un dispositivo a semiconduttore 
che, emettendo un raggio laser molto 
sottile e preciso, va a colpire col suo 
fascio luminoso la superficie di un rul¬ 
lo in rotazione. Questo, essendo foto- 
sensibile, si carica elettricamente nei 
punti individuati dal laser: si è creata 
in questo modo una immagine latente 
formata da cariche elettrostatiche. Es¬ 
se sono in grado di attrarre il toner, 
cioè l’inchiostro, che consiste in una 
polvere finissima di materiale plastico. 
Successivamente, durante la sua rota¬ 
zione, il cilindro tocca il foglio e vi 
trasferisce il toner che si era deposita¬ 
to, ottenendo in tal modo un'immagi¬ 
ne vera e propria. La fase successiva 
consiste nel riscaldare la carta tramite 
una resistenza elettrica posta sul per¬ 
corso. L'operazione, che provoca la 
fusione del toner, è necessaria per fis¬ 
sarlo al supporto. Quest’ultimo proce¬ 
dimento è del tutto simile a quello che 


avviene nelle fotocopiatrici (figura 7). 

I vantaggi che derivano da tale tec¬ 
nica sono quelli di poter stampare su 
una grande varietà di materiali, inclu¬ 
se etichette, carta adesiva sottile, fogli 
con margini forati per raccoglitori (che 
potrebbero incepparsi in una normale 
stampante) e soprattutto lucidi per ef¬ 
fettuare presentazioni. 

Per contro non è possibile fare uso 
di carta multicopie. 

Altri vantaggi non trascurabili e 
identici per i tre modelli sono: 

• silenziosità: rumore massimo di cir¬ 
ca 55 dB, inferiore alla normale con¬ 
versazione e molto più basso di quello 
generato da una stampante ad aghi o a 
margherita; 

• velocità massima: 8 pagine al minuto 
(corrispondenti all’incirca a 500 righe/ 
min, cioè 700 caratteri al secondo); 

• risoluzione: 118 punti per centime¬ 
tro, 14.000 per cmq, valore 10-20 vol¬ 
te più elevato di quello di una stam¬ 
pante ad aghi. Da questo deriva che la 
definizione dei caratteri è ottima. 

Queste stampanti sono intrinseca¬ 
mente molto affidabili: infatti tutte le 



Figura 5. Stampanti a margherita: i petali 
contenenti i caratteri sono disposti su un 
disco di metallo o di plastica. 



Cristallo Piezoelettrico 


Figura 6. Stampanti a getto: schema di convogliamento 
dell’inchiostro, attivato da una piccola pompa. 


■■ 
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Considerando le tre voci fondamentali di spesa (inchiostro, carta e manutenzione) si può ricavare una stima dei costi per 
pagina a seconda dei tipo di stampante utilizzata. 


parti la cui usura è maggiore (parti 
rotanti e rullo fotosensibile) sono con¬ 
tenute nella cartuccia del toner, che è 
del tipo usa e getta. Il toner, il cui 
costo si aggira per tutti e tre i modelli 
attorno alle 200.000 lire, è sufficiente 
per circa 3.000 copie (una spia rossa 
sulla cartuccia segnala quando si avvi¬ 
cina il momento della sua sostituzio¬ 
ne). 

Inoltre tali stampanti non necessita¬ 
no di alcuna manutenzione preventi¬ 
va. Il costruttore del "motore di stam¬ 
pa" consiglia una revisione ogni 
100.000 copie. Al ritmo di 4.000 fogli 
al mese, tale limite si raggiunge dopo 
più di due anni di uso continuo. Que¬ 
sta operazione comporta la sostituzio¬ 
ne delle parti minori: il costo dell’in¬ 
tervento, parti comprese, non dovreb¬ 
be superare le 500.000 lire. 

Come già anticipato, le differenze 
sostanziali derivano dall’hardware e 
dal software che gestiscono la stam¬ 
pante e determinano il modo di collo¬ 
quiare con l’elaboratore (o gli elabora¬ 
tori nel caso della LaserWriter della 
Apple) cui si collegano. 


Le opzioni di stampa sono grasset¬ 
to, corsivo, elongato, condensato, 
bianco su nero o grigio. Altri set di 
caratteri, di dimensioni limitate, sono 
disponibili acquistando una cassetta 
da inserire nell’apposito slot. 

Supporta il protocollo Diablo 630, 
cioè l’emulazione di una stampante a 
margherita. Il collegamento con l’ela¬ 
boratore avviene tramite l’interfaccia 
seriale RS232. Per poter usare uno dei 
set di caratteri contenuti nell’eventua¬ 
le cassetta opzionale è necessario in¬ 
viare alla stampante i comandi appro¬ 
priati, che vanno inseriti nel normale 
flusso di dati verso di essa (cosa peral¬ 
tro non semplicissima con gli attuali 
programmi di word processing). 

A causa delle capacità grafiche mol¬ 
to limitate non è in grado di collegarsi 
a Macintosh e trarre vantaggio delle 
caratteristiche di quest’ultimo. 

Il prezzo si aggira sui 7,5 milioni. 

HP LASER JET. È assai simile alla 
LBP—8, fatta eccezione per il fatto 
che ha una maggior capacità di esegui¬ 
re grafici vettoriali, pur disponendo di 


soli 49 Kbyte per questo scopo. 

Le cartucce con set aggiuntivi di ca¬ 
ratteri (2 o 3 per cartuccia) costano 
575.000 lire. Anche questi hanno di¬ 
mensioni limitate. 

È possibile collegarla alla porta se¬ 
riale di un Macintosh, usandola come 
stampante a esso dedicata. Un softwa¬ 
re apposito permette, con una certa 
lentezza e con risultati lievemente mi¬ 
gliori, di usarla al posto della stampan¬ 
te ad aghi ImageWriter della Apple. 

Il prezzo del modello base è di circa 
7,4 milioni. 

È disponibile un’espansione di me¬ 
moria che aggiunge un’interfaccia 
Centronics e 360 Kbyte alla grafica, 
velocizzando le operazioni, al prezzo 
di circa 2,3 milioni. Questa versione 
potenziata (assume infatti il nome di 
Laser Jet +) si può collegare al Macin¬ 
tosh e stampa sia testi che grafica. 

APPLE LASERWRITER. È in grado 
di fornire grafici e testi sulla stessa pa¬ 
gina, entrambi di ottima qualità, con 
molteplicità di dimensioni, tipi e stili 
dei caratteri. Al suo interno contiene 


CANON LBP —8. Si tratta di una 
stampante a emulazione della ruota di 
una margherita, con la possibilità di 
riprodurre delle singole schermate 
grafiche col metodo bit-mapped (pun¬ 
to per punto) qualora si disponga sul 
proprio personal del software necessa¬ 
rio. 

Contiene 128 Kbyte di RAM ed è 
dotata di interfaccia RS232 o Centro¬ 
nics. Il tipo di carattere che è fornito 
insieme alla stampante è il Courier 10, 
di cui qui sotto potete vedere un esem¬ 
pio: 


Questo è un esempio 
di Courier 10 


Stampanti laser 
meccanismo di funzionamento 


sistema di focalizzazione 
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La serie PT 9000 della Datamatlc 
comprende tutti i supporti perla 
stampante; la foto piccola mostra 
particolare del sistema di 
canalizzazione dei cavi. 


un computer, il più potente mai co¬ 
struito dalla Apple, equipaggiato di un 
microprocessore 68000 a 12 Mhz, 1,5 
megabyte di RAM e 512 Kbyte di 
ROM. Nella ROM sono contenuti il 
linguaggio PostScript e 4 set di caratte¬ 
ri professionali: Times, Helvetica, 
Courier e Symbol. Oltre alla consueta 
interfaccia RS232, è presente anche 
quella per AppleTalk che consente la 
condivisione della stampante fra più 
Mac (vedi Applicando, settembre 
1985, pagina 46). 

Quali vantaggi derivano da caratte¬ 
ristiche così spinte? Alcune considera¬ 
zioni consentono una semplice spiega¬ 
zione. 

Anche questa stampante ha una ri¬ 
soluzione di 14.000 punti per cm qua¬ 
drato. A questi corrispondono circa 8 
milioni di punti per pagina. In altre 
parole è necessario disporre di 8 milio¬ 
ni di bit (1 milione di byte) per rappre¬ 
sentare interamente una pagina, pun¬ 
to per punto. D'altronde, qualora si 
volesse trasferire alla stampante 1 mi¬ 
lione di byte per poter ottenere una 
pagina piena di grafici e di testi, occor¬ 


rerebbero almeno alcune ore. Qui in¬ 
terviene il PostScript: si tratta di un 
linguaggio ad alto livello, lo stesso usa¬ 
to nei sistemi di fotocomposizione, 
che consente di definire in modo sinte¬ 
tico il contenuto di una qualunque pa¬ 
gina, compresa quella che state leg¬ 
gendo, in termini di elementi che la 
compongono (per esempio tipo di ca¬ 
rattere, stile, dimensioni, elementi 
grafici e disegni, eccetera). Grazie al¬ 
l’interprete PostScript, contenuto nel¬ 
le ROM della LaserWriter, il numero 
di informazioni necessarie per ottene¬ 
re una pagina, grafici inclusi, viene 
drasticamente ridotto (in media 6 
Kbyte), rendendo minimo sia l'impe¬ 
gno del calcolatore collegato sia quello 
della rete. Nella ROM sono memoriz¬ 
zati anche i 4 set di caratteri già citati: 
Times, Helvetica, Courier e Symbol. I 
primi due, ottenuti in licenza dalla 
Mergentheler (il più importante co¬ 
struttore di sistemi di fotocomposizio¬ 
ne) sono stati scelti per la loro chiarez¬ 
za e facilità di lettura: non a caso i 
quotidiani e le riviste usano in genere 
proprio questi tipi. Il Courier è quello 


Carrelli portastampanti 

Funzionalità, ergonomicità, maggio¬ 
re comfort, ambientazione. Parole che 
sembrano sogni per chi ogni giorno si 
imbatte con intrecci di fili, ardue mano¬ 
vre per sistemare la carta o per selezio¬ 
nare pulsanti e switch. Il mercato è ve¬ 
nuto incontro a queste necessità e sono 
in molti oggi in grado di offrire diversi 
appoggi per computer. La Datamatic, 
per esempio, ha aggiornato la sua linea 
chiamata Pt 8000 canalizzando i model¬ 
li, permettendo cioè lo scorrimento dei 
cavi all’interno delle gambe del tavolo. 
La nuova serie, battezzata Pt 9000, offre 
diverse soluzioni in misure e colore, op¬ 
zione prevista anche nella linea System 
2000 della Wright Line Santal. La Fo.ce- 
me. propone la serie Inform, un sistema 
composto da un tavolo portastampante 
corredato da un convogliatore per mo¬ 
duli a lettura facile a due stazioni, com¬ 
pleto di ruote e introduttore. Per parti¬ 
colari esigenze ergonomiche è disponi¬ 
bile la linea Funzione/a della Data Base, 
che nella versione regolabile può adat¬ 
tarsi a qualsiasi ubicazione. A struttura 
metallica regolabile sono invece i mo¬ 
delli Micropact della King Mec. Altri mo¬ 
delli possono essere richiesti alla Gier- 
re Informatica, alla Tpa e alla Mee. 


ben noto delle macchine per scrivere, 
mentre Symbol contiene tutti quei ca¬ 
ratteri e simboli necessari in campo 
scientifico. 

Poiché il PostScript consente di de¬ 
finire una pagina e il suo contenuto 
indipendentemente dalle sue dimen¬ 
sioni, con la LaserWriter è possibile 
avere dimensioni dei caratteri che van¬ 
no da un minimo di 4 punti a 128 e 
oltre. 

La caratteristica veramente impor¬ 
tante, che rende la LaserWriter così 
appetibile nonostante il prezzo, è la 
completa compatibilità con Macintosh 
e la possibilità di essere condivisa fra 
più Mac. Infatti tutti i migliori pro¬ 
grammi che girano su Macintosh pos¬ 
sono fare uso della stampante laser 
Apple. Diventa perciò possibile pre¬ 
parare relazioni perfette con MacWri- 
te, MS Word o Jazz, integrarle con i 
grafici e con i disegni di MacPaint e 
MacDraw, preparare lucidi che richie¬ 
dono caratteri di dimensioni grandi ec¬ 
cetera, il tutto con una qualità insupe¬ 
rabile, senza dover inviare alla La¬ 
serWriter nessuno speciale comando! 

L’interfaccia per la rete locale Ap¬ 
pleTalk consente di collegare una La¬ 
serWriter a un massimo di 31 Macin¬ 
tosh (e, in futuro, ad altri personal). In 
questo modo la stampante viene con¬ 
divisa e usata da tutti i calcolatori con- 
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Post-stampa 

Staccare, rifilare e separare, 
sono tutte attività noiose, di¬ 
spersive e soprattutto antieco¬ 
nomiche. Il trattamento manuale 
dei moduli continui stampati dal 
calcolatore (bolle, fatture, tabu¬ 
lati gestionali e statistici ecc.) è 
un problema che capita piutto¬ 
sto spesso in un’azienda con un 
sistema di elaborazione dati. La 
Datamatic offre due apparec¬ 
chiature per risolvere questo 
problema: una strapperina elet¬ 
tronica APM STP-50 e uno scar- 
bonatore separatore SCB-50. 
La prima serve per staccare i fo¬ 
gli dei moduli continui in fogli 
singoli, con possibilità di rifilar¬ 
ne i bordi perforati. Il modulo 
continuo viene trascinato da rulli 
di gomma, regolabili e ad alta ve¬ 
locità. Opportuni coltelli laterali 
eseguono la rifilatura, mentre un 
ulteriore coltello centrale può 
eseguire tagli longitudinali. Il 
formato dei fogli accettati va da 3 
a 12 pollici di lunghezza e fino a 
38 cm di larghezza, con un peso 
che va da 40 a 250 gr. 

Il secondo è previsto per effet¬ 
tuare la separazione di moduli 
continui in duplice copia e l’e¬ 
ventuale eliminazione della carta 
carbone. Le copie trattate ven¬ 
gono impilate con regolarità, 
mentre la carta carbone viene 
accumulata su un opportuno av¬ 
volgitore a frizione per un’age¬ 
vole eliminazione. Il formato dei 
moduli accettati va da 4 a 12 pol¬ 
lici per la lunghezza e fino a 18 
cm per la larghezza. La velocità 
di trascinamento è di 50 m/min. 

Anche la Fima contribuisce al¬ 
le operazioni di post-stampa 
con tre taglierine rapide e flessi¬ 
bili: la Fimafold 1000, controllata 
completamente da un micropro¬ 
cessore, la 1500 sua naturale 
evoluzione e la 90 indicata per le 
altissime produzioni. 



Tra gli accessori post-stampa, 
questo scarbonatore separatore 
prodotto dalla Datamatic. 


Gli indirizzi 

Gli accessori per stampanti presentati in queste pagine sono disponibili 
nei negozi specializzati. Ecco anche gli indirizzi delle ditte produttrici o 
distributrici: 


Ape, Via Catalani 23, Roma. Telefono 06/83922646 

Apple Computer, Palazzo Q8, Milanofiori, Rozzano (MI). Telefono 
02/8242156 

Asem, Zona Artigianale S.Stefano di Buia (UD). Telefono 0432/961014 

Cover, Via L.Einaudi 22, Brendola (VI). Telefono 0444/798354 

Data Base, Viale Legioni Romane 5, Milano. Telefono 02/40303 

Datamatic, Via Volturno 46, Milano. Telefono 02/6073876 

Delin, Via Cosentino 22, Firenze. Telefono 055/4379586 

Elcom, Corso Italia 146, Gorizia. Telefono 0481/30909 

Gierre Informatica, Via Umbria 36/a, Reggio Emilia. Telefono 0522/38655 

G.P.M., Piazza Conciliazione 1, Milano. Telefono 02/4981051 

Ics, Via S.Giuseppe 137, Saronno (CO). Telefono 02/9625841 

Incas, Via Trento 17, Passirana di Rho (MI). Telefono 02/9306593 

King Mec, Via Regio Parco 108 bis, Settimo Torinese (TO). Telefono 

011/8009393 

Mee, Via Boni 29, Milano. Telefono 02/4988541 

Paolini, Via Ostiense 48, Roma. Telefono 06/5755006 

Pertel, Via Ormea 99, Torino. Telefono 011/655865 

Ragom, Via M.Delfico 20, Milano. Telefono 02/3452150 

Sedagraf, Largo Re Umberto 106, Torino. Telefono 011/582343 

Step, Via Morigi 35, Piacenza. Telefono 0523/752000 

Tpa, Via Terraglio 269, Preganziol (TV). Telefono 0422/381189 

Verbatim, Via Cernaia 2, Milano. Telefono 02/654431 

Wright Line Santal, Via Boito 6, Novate Milanese. Telefono 02/3548251 


Macintosh: il problema della grafica 

La maggior parte dei programmi per Macintosh genera documenti stampabili 
così come appaiono sul video. Per fare ciò la stampante collegata dovrà poter 
riprodurre "graficamente" testo e disegni. Non tutte le stampanti hanno queste 
possibilità: le stampanti a margherita, per esempio, avendo i caratteri già incisi 
sulla margherita, non sono in grado di riprodurre disegni punto per punto come il 
Macintosh richiede. Ma anche le stampanti ad aghi, per le quali il lavoro sarebbe 
possibile, incontrano nella maggior parte dei casi problemi di compatibilità. L’ico¬ 
na Imagewriter, che si incontra in tutti i programmi Macintosh, contiene un pro¬ 
gramma che, attivato dal menù di stampa, invia alla stampante i necessari codici 
per ricostruire l’immagine da stampare, ma questi codici sono quelli propri dell'l- 
magewriter e molte volte non sono compatibili con quelli richiesti da altre stampan¬ 
ti. Per ovviare a queste incompatibilità le soluzioni sono principalmente: 1) acqui¬ 
stare una stampante Image Writer compatibile; 2) acquistare una stampante com¬ 
pleta di adattatore Macintosh prodotto dal fabbricante della stampante; 3) utilizzare 
un software diverso da quello Image Writer. La prima soluzione sembra la più 
semplice, ma è comunque meglio controllare "sul campo" questa compatibilità 
chiedendo di provare la stampante con Macintosh prima dell’acquisto. La seconda 
soluzione è adottata da alcuni fabbricanti che pur producendo stampanti IBM 
compatibili non hanno voluto negare la possibilità ai propri clienti di effettuare un 
collegamento con il Macintosh: purtroppo tra le stampanti provate solo la Star e la 
Mannesmann Tally sono risultate in grado di fornire un adattatore. La terza soluzio¬ 
ne è la soluzione software. Questa soluzione per esempio è quella adottata dalla 
Hewlett-Packard che ha fatto studiare da una software house indipendente due 
programmi specifici per le sue stampanti LaserJet e ThinkJet. Esistono anche 
alcuni programmi universali di interfacciamento per diverse stampanti; alcuni di 
questi consentono addirittura di crearsi un interfacciamento su misura inserendo i 
caratteri di controllo della propria stampante. Comunque tutti questi programmi 
"universali" sono affidabili nel caso di loro utilizzo per la trascrizione di testo 
(opzione "Solo testo" nel menù di stampa), ma lo sono molto meno nel caso si voglia 
stampare la pagina così come appare a video. Qui di seguito sono elencati i nomi 
dei programmi utilizzati per le prove e gli indirizzi delle software house che li 
producono, o degli importatori italiani: 

DaisyWheel Connection - per stampanti margherita solo testo - Southern 
European Computer - Montorfano (CO) - tei. 031/200261 
ProPrint - riconosce solo file di testo Bits & Bytes - Milano - tel.02/8376207 
Laserstart, Jetstart, Epstart - per stampanti Hewlett Packard e alcuni modelli 
Epson - compatibilità completa - SoftStyle Ine. - 7192 Kalanianaole Hwy, Suite 
205, Honolulu, Hawaii 96825, USA - tei. 001/800/3675600 

Printer Interface software universale, consente di creare la propria interfaccia per 
stampante - Data Pak - 14011 Ventura Blvd., Suite 401, Sherman Oaks, California 
91423. 
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Accessori vari 

Chi utilizza con frequenza la propria stampante e non intende essere 
disturbato, può difendersi dal rumore collocando la stampante dentro una 
cappa insonorizzata. La Ragom propone oltre 250 modelli, completamente 
insonorizzati, per stampanti di tutti i tipi e di tutte le dimensioni. Altri 33 
modelli diversi sono prodotti da FO.CE.ME, divisi in due gruppi a seconda 
che la struttura sia in alluminio o in econoline. La coppa fonoassorbente è 
garantita per una riduzione fino a meno di 53 db/ (A), è antistatica e provvista 
di feritoie a persiana e di molle a gas per mantenere il portello in quasiasi 
posizione di apertura. 

Un ultimo modello viene dalla Cover. La struttura di questo modello è in 
ABS goffrato di colore beige ed è costituita da quattro pezzi facilmente 
componibili. La feritoia consente l’utilizzo di modulistica da 40 cm, i materia¬ 
li utilizzati la rendono completamente portatile. È predisposta per una vento¬ 
la di raffredamento e a seconda dei diversi tipi di stampante inseriti può 
raggiungere una diminuzione del rumore fino al 90%. 

Ecco alcuni dei tantissimi accessori prodotti da ICS: sottostampante 
disponibile nei due modelli Wave e Formed, che razionalizza lo spazio 
consentendo di posizionare la risma di carta sotto la stampante. Tappeto 
antistatico disponibile nei modelli Excellence e Regular, impedisce l'accu¬ 
mulo di cariche elettrostatiche, evitando danni all’hardware e all’operatore. 
Un carrellino porta moduli, per agevolare il trasporto di supporti pesanti. Il 
carrellino costituito da una sola base di 30 x 41 cm, da rotelle girevoli da 6.3 
cm e da un bordo per evitare lo slittamento del materiale, può essere dotato 
di una maniglia addizionale per facilitarne la manovrabilità. Un leggio rego¬ 
labile, staccato, per formato UNI A4 o tabulato, di color fumo, è montato su 
una struttura in acciaio, si lascia posizionare su ogni superficie di lavoro e 
previene l’affaticamento degli occhi. Infine, uno strumento abbastanza inu¬ 
suale, un igrometro per conoscere istantaneamente il tasso di umidità del¬ 
l’ambiente di lavoro. Infatti un tasso troppo basso d’umidità aumenta la 
probabilità di accumulo di cariche statiche sia sul monitor che sulla stam¬ 
pante. La struttura di questo strumento è in alluminio nero opaco, con 
bordatura cromata e tre fori per essere appeso al muro. 

Una cupola 
fono 

assorbente, 
disponibile in 
econoline o 
in alluminio. 

È prodotta 
dalla 

FO.CE.ME. 



nessi in rete. Il grande vantaggio che 
ne deriva è di ordine economico: il 
costo iniziale viene ripartito fra tutti 
gli utenti. 

Tramite l’interfaccia RS232 è possi¬ 
bile collegarla ad un qualunque calco¬ 
latore. 

Per finire il prezzo: 14,4 milioni, 
giustificato viste le prestazioni della 
stampante. 

LaserWriter: 
notizie utili 

• Autotest all’accensione. All’accen¬ 
sione, dopo la fase di riscaldamento 
che dura circa 1 minuto, la stampante 
esegue un autotest e produce un foglio 
di controllo che indica il numero di 
copie fatte fino a quel momento. Que¬ 
sto numero, che non è cancellabile, 
viene tenuto in una memoria del tipo 
EPROM. È molto utile per determi¬ 
nare sia il carico mensile (infatti il co¬ 
struttore consiglia di non superare le 
4.000 copie/mese), sia la durata del 
toner, sia il raggiungimento delle 
100.000 copie per il primo tagliando. 

• Riduzioni e ingrandimenti. Altra ca¬ 
ratteristica interessante (derivante 
dall’utilizzo del PostScript) è quella di 
poter ingrandire o rimpicciolire in fase 
di stampa un qualunque elaborato 
(per esempio fatto con MacDraw) di 
un fattore 4, senza soluzione di conti¬ 
nuità. 

• Accettazione di fogli singoli. Nor¬ 
malmente la stampante preleva i fogli 
da un cassetto: tuttavia è possibile in¬ 
serire, da un’apposita fessura, dei sup¬ 
porti singoli. Ciò è utile quando si vuo¬ 
le stampare su buste, cartoncini, ecce¬ 
tera che non hanno un formato stan¬ 
dard. 

• Condivisibilità in rete. Tramite l’in¬ 
terfaccia per la rete locale AppleTalk 
integrata, fino a 31 Macintosh possono 
usare la stessa stampante. Ne conse¬ 
gue che 10 Macintosh, ognuno con la 
sua stampante tradizionale, costano 
all’incirca tanto quanto 10 Macintosh 
e 1 stampante LaserWriter. Inoltre più 
stampanti LaserWriter possono essere 
connesse alla medesima rete. 

• Scelta stampante tramite desk acces- 
sory. Un apposito desk accessory, ac¬ 
cessibile da qualunque applicazione 
sotto il menù mela, consente di sce¬ 
gliere quale stampante si intende usa¬ 
re (LaserWriter o ImageWriter). La 
scelta rimane in memoria anche quan¬ 
do il Macintosh è spento. Nonostante 
il calcolatore faccia uso della porta 
stampante per collegarsi alla rete Ap¬ 


pleTalk, si può continuare a fare uso 
deH’ImageWriter: questa va connessa 
alla porta modem del Macintosh 
(quella con l’icona del telefono). 

• Collegamento ad altri computer. 
L’interfaccia RS232 consente di colle¬ 
gare la stampante laser a un qualsiasi 
calcolatore: Apple //e, Ile, PC IBM e 


compatibili, minicomputer eccetera 
(oltre a Mac, naturalmente). Due so¬ 
no i possibili modi di lavorare: 
a) in emulazione della già citata stam¬ 
pante a margherita Diablo 630, per 
esempio con un word processing come 
Wordstar; b) tramite un calcolatore o 
minicomputer dotato di un program- 
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ma in grado di colloquiare con il Post¬ 
Script, accedendo in tal modo a tutta 
la potenza della LaserWriter (la ver¬ 
sione MS-DOS del programma Mi¬ 
crosoft Word è compatibile col Post¬ 
Script della LaserWriter). 

• Macintosh. Consente di ottenere il 
meglio dalla LaserWriter in quanto 
traduce tutte le sue stampe, grafici e 
testi in PostScript prima di inviarle alla 
stampante. 

• PageMaker e Typographer. Sono i 
nomi di due applicazioni (ne esistono 
anche altre: Mac Publisher, Ready Set 
Go), che trasformano il Macintosh e la 
LaserWriter in un sistema di fotocom¬ 
posizione professionale di uso imme¬ 
diato, adattissimo per produrre bollet¬ 
tini, newsletter, giornali aziendali. 

Il PostScript 

È un linguaggio ad alto livello, simi¬ 
le al Pascal nella struttura, che è stato 
"inventato” per i sistemi di fotocompo¬ 
sizione. Contiene pertanto tutte quel¬ 
le istruzioni che consentono di descri¬ 
vere una pagina, sia nelle scritte che 
nei disegni e nei grafici. Anziché le 
parole tipiche del Pascal, quali INT, 


Caratteristiche tecniche Apple LaserWriter 

Sistema di stampa: 

Canon LBP-CX laser xerographic 

Controllore hardware: 

Microprocessore 68000 - 12 MHz 

500 «byte ROM 

1500 Kbyte RAM 

Interfaccia AppleTalk 

Interfaccia RS232 

Qualità di stampa: 

130 punti/centimetro (300 punti/pollice) 

Caratteri disponibili: 

Times, Helvetica, Couriercon le opzioni di 
grassetto, corsivo e grassetto corsivo e simboli 
scientifici 

Stili generabili: 

Sottolineato, ombreggiato, bordato in ogni 
combinazione 

Altre stampe: 

Grafici a piena pagina e set di caratteri Macintosh, 
bit-mapped 

Misure dei caratteri: 

Minimo: 4 punti, massimo: 128 e oltre, secondo 
l'applicazione 

Velocità di stampa: 

Massima 8 pagine/minuto 

Protocolli supportati: 

PostScript, sottoinsieme Diablo 630 

Ciclo di lavoro consigliato: 

4000 copie/mese circa 

Alimentazione carta: 

Automatica con cassetto raccoglitore da 100 fogli 
e manuale 

Tipo di carta: 

Per fotocopie standard 

Carta normale bianca o colorata peso medio 

Trasparenti standard 

Buste, cartoncino leggero ed etichette con 
alimentazione manuale 

Misure carta: 

DIN A4, DIN B5, lettera USA, legale Usa 

Massima superficie di stampa: 

A4: 19,0 x 26,6 cm. 

B5:17,7 x 24,5 cm. 

Lettera USA: 20,32 x 27,6 cm. 

Legale USA: 17,78 x 31,7 cm. 

Alimentazione: 

220 volt alternati 

700 watt 


Qui di seguito un esempio, con 
semplice programma PostScript 

i commenti sulla destra, di un 
e la stampa ottenuta. 

LISTATO 

COMMENTO 

/pollice (72 mul) def 

% Definizione dell'unità di misura 
% usata in questo programma 
% (1"=72 punti) 

/quadrato 

% Definizione della procedura 
% "quadrato" 

{ newpath 
moveto 

0 1 pollice rlineto 

% che appunto disegna i 4 lati 

1 pollice 0 rlineto 

% di lunghezza uguale a 1 pollice 

0 -1 pollice rlineto 
closepath 

) def 

% fine definizione "quadrato" 

1 pollice 1 pollice quadrato 

% Posiziona il quadrato alla 
% distanza di 1 pollice dai bordi 
% in basso a sinistra della pagina 
% x=1", y=1" 

fili 

% Riempie di nero questo quadrato 

stroke 

% Copia il quadrato nella pagina 

3 pollice 2 pollice quadrato 

% Mette un altro quadrato nella 
% posizione x=3", y=2” rispetto allo 
% spigolo in basso a destra 

0.75 setgray 

% Cambia lo sfondo da nero a 
% grigio 

fili 

% Riempie il quadrato con lo 
% sfondo scelto 

showpage 

% Stampa la pagina 


SIN, COSIN eccetera, che definisco¬ 
no operazioni e controlli da effettuare 
all’interno di un programma, si incon¬ 
trano quelle che permettono di com¬ 
porre le pagina da stampare: per 
esempio SETGREY definisce il livello 
di grigio di uno sfondo; FILL riempie 
una certa area con lo sfondo scelto; 
ROTATE consente di ruotare il con¬ 
tenuto di una pagina o una scritta; (TI- 
MES-BOLD) FINDFONT seleziona 
il set di caratteri Times in stile grasset¬ 
to; SHOWPAGE, infine, provoca la 
stampa della pagina. 

Il PostScript è indipendente dal tipo 
di dispositivo su cui è realizzato, per¬ 
ciò la stessa descrizione (cioè la stessa 
pagina) può essere ottenuta sia con la 
LaserWriter che con i sistemi di com¬ 
posizione che hanno un costo 5 o 10 
volte superiore. Quello che cambia, 
naturalmente, è la risoluzione. Non a 
caso, grazie a un accordo fra la Apple 
e la Linotype (noto produttore tede¬ 
sco di sistemi di fotocomposizione) è 
possibile usare il Macintosh e i suoi 
programmi per preparare direttamen¬ 
te le pellicole da cui si ricavano le la¬ 
stre per la stampa. 

Alfonso Scoppetta 
Hanno collaborato: Giorgio Caironi, 
Mauro Gandini, 
Mario Magnani 
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guida stampanti 

30 stampanti 
a confronto 


Una guida per individuare la stampante 
dei vostri sogni? Non proprio, ma senza 
dubbio un valido aiuto per scegliere 
quella che può soddisfare pienamente le 
vostre esigenze di stampa. In un’unica 
tabella, ricca e ben organizzata, è 
racchiusa infatti la maggior parte delle 
informazioni che vi possono servire. 

Senza dubbio inizierete dalla colonna 
dei prezzi; non dimenticate, però, che la 
scelta della stampante va ben oltre 
questa informazione. Per fare la scelta 
migliore decidete innanzitutto come 
userete la stampante e per che cosa. E' 
questo il dato che vi aiuterà a 
determinare quale deve essere la sua 
velocità e quanto elevata la sua qualità 
(che sono i due parametri fondamentali), 
quanto silenziosa deve essere e a quali 
precise esigenze di compatibilità deve 
rispondere. 

Nella tabella trovano posto la stampa 
di un carattere ingrandito del 500% , che 
vi darà l’idea della qualità di stampa, e 
una prova di stampa a grandezza naturale 
per avere una visione d’insieme. Inoltre 
troverete un elenco dettagliato di tutte le 
altre caratteristiche che concorrono a 
determinare le prestazioni di una stam¬ 
pante. Per esempio la versatilità di una 
macchina capace di produrre sulla 
medesima pagina testi, tabelle e grafici 
è una caratteristica molto rilevante. Il 
suo modo di interfacciare, per via seriale 
o parallela, lo è in proporzione molto 
meno. Importante, dal punto di vista pra¬ 
tico, è poi sapere se la stampante 
possiede la documentazione in lingua 
italiana, e va valutata bene anche la 
compatibilità con i computer di casa 
Apple. Non trascurate però di leggere 
attentamente anche l'articolo che pre¬ 
cede la tabella: nonostante in questa si 
trovino, razionalmente organizzate in 
poco spazio, tutte le informazioni 
fondamentali, è in quello che potrete 
scoprire quali sono i parametri, non 
quantificabili, che fanno tutta la dif¬ 
ferenza tra una macchina e l'altra. 


Chiave di lettura 


COMPATIBILITA' 


PREZZI 


Da 700.000 a 999.000 

Da 1.000.000 a 1.249.000 

Da 1.250.000 a 1.499.000 

Da 1.500.000 a 1.999.000 

Da 2.000.000 a 7.999.000 



Caratteri italiani 


■il:!!: ^=4 


Mi 

in 


Manuale in 
inglese. 
Manuale in 
italiano. 



\ 1 USL 

ri 


Stampa solo con 
foglio singolo. 


Stampa con 
golo e modu 
continuo 


loglio 


sin- 


Oltre 8.000.000 


CARATTERISTICHE 
DI STAMPA 


N Neretto 
B Bidirezionale 
Q Letter Quality 
S Sottolineatura 
T Sub/Superscript 
C Colore 



Grafica Mac 
e II. Grafica 
solo Mac. 


Indicano la 
compatibilità 
dei relativi 
programmi. 
ST = Solo 
Testo. 


LIVELLO DI RUMOROSITÀ' 


CARATTERISTICHE 
DI FORMATTAZIONE 

P Proporzionale 
G Giustificato 
E Epigrafe 
I Interlinea variabile 
A Altezza pagina 
TO Tabulazione Orizz. 
TV Tabulazione Vert. 



Il numero in alto 
indica i decibel di 
rumorosità. La 
riga fissa indica 
55, un livello di 
rumorosità più 
che accettabile. 
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DORI .AND ITALIANA 


Le scritture più importanti richiedono 
stampanti silenziose che sappiano dare 
ai contenuti la forma più adeguata. 

Alla massima velocità consentita dai tempi. 



L’importanza di ciò che scrivi dipende anche da 
come lo scrivi: le possibilità di comprensione 
immediate dei messaggi del tuo personal dipendono in 
larga misura da come questi vengono trascritti, 
composti, presentati. 



Sistemi di scrittura rivoluzionari 

Per questo la Hewlett-Packard^ 
all’avanguardia nell’elettronica 
mondiale, e leader nel settore 
delle stampanti per personal 
computer ha creato dei veri e 
propri sistemi di scrittura che 
rivoluzionano le tecnologie fin qui adottate!' 

Come la stampante professionale LaserJet, che 
introduce per la prima volta tutti i vantaggi della stampa 
laser: caratteri e grafica di alta qualità, possibilità di 
utilizzare tipi diversi di caratteri, elevata velocità, fun¬ 
zionamento silenzioso, affidabilità. 

LaserJet è una stampante laser da tavolo in grado 
di realizzare otto pagine al minuto, con più tipi di 
caratteri nella medesima pagina e con ampie possibilità 
grafiche. 

E come la stampante ThinkJet che grazie alla sua 
tecnologia a spruzzo di inchiostro stampa velocemente 
e silenziosamente lettere e grafici. 


Compatibili con altri personal 

Potrai usare le stampanti HP col tuo personal, an¬ 
che se non hai un HP. 




Particolare della Bibbia a 42 linee di Gutenberg 1456. 
Per gentile concessione dell’Arcivescovo di Canterbury 
e dei Curatori della Biblioteca di Lambeth Palace 





Infatti sono compatibili 
con tutti i principali 
personal sul mercato. 

Se vuoi saperne di 
più ti basterà 
compilare in ogni sua 
parte l’accluso coupon: 
riceverai, senza impegno, una documentazione 
dettagliata sulle stampanti HP e tutte le loro 
possibilità d’impiego. 


^Se vuoi saperne di più sulle stampanti HP 

invia questo tagliando a Hewlett Packard Italiana S.p.A. 
Marketing Communication C.P. 10190,20100 Milano. 


I 

Nome e Cognome 

I 


Società _ 
Indirizzo 


HP'Soluzioni produttive 


Hewlett-Packard Italiana S.p.A. 

Via G. Di Vittorio 9 - 20063 Cernusco Sul Naviglio 
Milano-Tel. 02/923691 


Whp I HEWLETT 

rnLnM Packard 







guida .-stampanti 


Modello 


Tipo 

Larg. carrello 
Dimensioni 
Peso 
Prezzo 


Caratteri 
per secondo 


Matrice 

Buffer 

- Collegamento 


Caratteri 
per pollice 


Eoson-LX 80 








Aghi 

L. quality 

9x9 

5 

10 


Nel mezzo del 

80 colonne 

Standard 100 

1 Kb 

6 

12 


di nostra vit 

84x422x314 

Bozza 

Seriale 

8.5 

17 

ri il 

in una selva 

5,2 Kg 






c:he 3 la 2 dir 


Pagine 






L. 790.000 

mese 





Facit 4509 


Aghi 

80 colonne 
420x125x340 

9 Kg 

L. 855.000 

L. quality 
Standard 120 
Bozza 

Pagine 

mese 

9x9 

248 b 

Parallela 

Ap 

Nel mezzo del 
di nostra vit 

in una selva 

che 3 la 2 diri 


Star SG-10 


Aghi 

80 colonne 
145x392x315 

7 Kg 

L. 950.000 

L. quality 
Standard 120 
Bozza 

Pagine 

mese 

9x9 

2 Kb 

Seriale 

Ap 

Nel mezzo del 
di nostra vit 
in una selva 

che 3 la 2 diri 


Mannesmann MT-85 




Nel mezzo del cam 
di nostra vita mi i 
in una selva oscur 
cheg la^ diritta v 


Aghi 

80 colonne 
440x280x160 
8 Kg 

L. 985.000 


L. quality 
Standard 136 
Bozza 


9x8 
3 Kb 
Seriale 


Pagine 

mese 


9 

10 

12 


13.4 

15 

17 



nageWriter 1 


Appiè in 

Aghi 

80 colonne 
398x285x125 
8,5 Kg 

L. quality 
Standard 180 
Bozza 

7x8 

3 Kb 

Seriale 

Ap 

• 

Nel mezzo del 
di nostra vit 

in una selva 

che 3 1 il/ diri 

L. 999.000 

Pagine 

mese 



Oki Microline 182 

Aghi 


9x9 

10 17.1 



L. quality 


Nel mezzo del 

80 colonne 

Standard 120 

256 b 

12 

i**\ 

di nost ra vit 

360x275x80 

Bozza 

Seriale 


M p 

in una selva 

4,5 Kg 





ohe'’ la s diri 


Pagine 





L. 1.050.000 

mese 




■■■■ 
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Stampa 

Caratteri 

Alimentazione 

Compatibilità 

Livello Distributore 


italiani 

Compatibilità 

programmi 

rumore 

Formattazione 

Manuale 


grafica 



N B Q S T 


P G E I A 
TO TV 





|Appl«Wortrs| • 

o. 




Epson-Segi, 

Via Timavo 12 
Milano 

Tel. 02/6709136 


N B Q S T 


G E TO 
TV 



|Appl#Wrller| 

0. 


|Appl«WorVs|J 

0. 

0 
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Facit Data Products, 
Centro Direzionale 
Colleoni-Pal. Orione- 
Ingresso 1 

Agrate Brianza (MI) 
Tel. 039/636331 










































































































































































































































































































guida -stampanti 


Modello 


Tipo 

Larg. carrello 
Dimensioni 
Peso 
Prezzo 


Caratteri 
per secondo 


Matrice 

Buffer 

Collegamento 


Caratteri 
per pollice 



ESW 1000 

Margherita 

L. quality 14 


Nel mezzo del 


118 colonne 

Standard 

2 Kb 

di nostra vit 

155x520x360 

Bozza 

Seriale 

in una $e1 va 

11,2 Kg 

Pagine 


che^ la* 1- diri 




L. 1.050.000 

mese 



10 

12 


15 


HP ThinkJet 

Ap 

Nel mezzo del cì 
di nostra vita p 
in una selva ose 
eneo la2 diritte 


Getto ine. 

80 colonne 
300x200x150 
4 Kg 

L. 1.137.000 


L. quality 
Standard 150 
Bozza 

Pagine 

mese 


11x12 
1 Kb 
Seriale 


10.7 

12 


21.3 


Mannesmann MT-86 


Nel mezzo del cam 
di nostra vita mi i 
in una selva oscur 
cheg la' 1 diritta v: 



Aghi 

132 colonne 
600x280x180 
12,5 Kg 

L. 1.200.000 


L. quality 
Standard 136 
Bozza 

Pagine 

mese 



9 

10 

12 


13.4 

15 

17 


# *V f*- 

P 


FX-80+ 





Aghi . 

L. quality 96 

9x9 

Nel mezzo del 

80 colonne 

Standard 160 

2 Kb 

di nos-tnaL y 

100x420x347 

Bozza 

Seriale 

in una selva 

7,5 Kg 



che 3 1 a.2 dir- 


Pagine 



L. 1.250.000 

mese 



8.5 

10 


17 


Apple ImageWriter II 

A: 

P 

Nel mezzo del 
dì nostra vìt 
in una selva 

ir 

che 3 la 2 diri 


Aghi 

80 colonne 
431x304x127 
11,4 Kg 

L. 1.300.000 


L. quality 45 
Standard 180 
Bozza 250 

Pagine 

mese 


7x8 
32 Kb 
Seriale 
AppleTalk 


9 

10 

12 


13.4 

15 

17 


Panasonic KXP 1092 

Aghi 

L. quality 33 

9x9 




Nel mezzo di 

80 colonne 

Standard 180 

7 Kb 

A r*\ 

di nostra vit 

427x350x137 

Bozza 

Seriale 

ri p 

in una selva 

8,9 Kg 




che 3 la 3 diri 

L. 1.350.000 

Pagine 

mese 



5 

6 
8.5 


10 

12 

17 
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Stampa 

Caratteri 

Alimentazione 

Compatibilità 

Livello Distributore 


italiani 

Compatibilità 

programmi 

rumore 

Formattazione 

Manuale 


grafica 
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Modello 

Tipo 

Caratteri 

Matrice 

Caratteri 


Larg. carrello 

per secondo 


per pollio 


Dimensioni 


Buffer 



Peso 





Prezzo 


Collegamento 



Oki Microline 192 


Aghi 

80 colonne 
80x360x275 

4,5 Kg 

L. 1.400.000 

L. quality 
Standard 160 
Bozza 

Pagine 

mese 

9x9 

8 Kb 

Seriale 

Ap 

Ne 1 me zzo de 
di nostra vi 
in una selve 

che3 1a2 dir 


Star Power Type 

Ap 

Nel mezzo del Cc 
di nostra vita r 
in una gelva os< 

che^ la^ diritt? 


Margherita 
132 colonne 
498x363x140 
11,7 Kg 

L. 1.400.000 


L. quallty 
Standard 18 
Bozza 

Pagine 

mese 



10 

12 


15 


Star SG-15 ]LB 

Ap 

Nel mezzo del 
di nostra vit 

in uria selva 


che 3 la 2 diri 


Aghi 

132 colonne 
145x542x315 
10 Kg 

L. 1.420.000 


L. quality 
Standard 120 
Bozza 

Pagine 

mese 



8 

10 


13.6 


Oki Microline 183 


A p 


Nel mezzo del 
di nostra vit 

in una se l va 

che'* la® diri 


Aghi 

132 colonne 
512x275x80 
6 Kg 

L. 1.475.000 


L. quality 
Standard 120 
Bozza 

Pagine 

mese 


9x9 
256 Kb 
Seriale 


10 

12 


17.1 


Apple ImageWriter 1 

Ap 

•i 

Nel mezzo del 
di nostra vit 

in una selva 

che 3 1di r j 


Aghi 

132 colonne 
570x285x125 
13 Kg 

L. 1.550.000 


L. quality 
Standard 180 
Bozza 

Pagine 

mese 



9 

10 

12 


13.4 

15 

17 


Epson f 

=X-100+ 

Aghi 

L. quality 96 

9x9 




Nel mezzo del 

132 colonne 

Standard 160 

2 Kb 

•* v 

di nostra • 

150x594x354 

Bozza 

Seriale 

r"i p 

in una selva 

10,4 Kg 




che3 1a2 dir 


Pagine 




L. 1.550.000 

mese 



8.5 

10 


17 
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Stampa 

Formattazione 


Caratteri 

italiani 

Manuale 


Alimentazione 

Compatibilità 

grafica 


Compatibilità 

programmi 


Livello Distributore 
rumore 






N B S T 


P G E I A 
TO TV 





Apple Computer, 
Milanofiori Pai. Q/8 
Rozzano (MI) 

Tel. 02/8242156 


N B Q S 


P G E I 
TO TV 






[AppleWorlcsj J 

o. 

G 

f[ ET 

MacDraw 




Epson-Segi, 

Via Timavo 12 
Milano 

Tel. 02/6709136 


























































































































































































































































































guida stampanti 


Modello 

Tipo 

Caratteri 

Matrice 

Caratteri 


Larg. carrello 

per secondo 


per pollio 


Dimensioni 


Buffer 



Peso 





Prezzo 


Collegamento 



| Citizen 

MSP-20 



— 

— 



Aghi 

L. quality 50 

9x9 

10 


Mei mezza dei 

80 colonne 

Standard 200 

8 Kb 

12 

* 

d:i nostra vit 

90x403x344 

Bozza 

Parallela 


H L/ 

in una selva 

5 kg 





c: h e 3 1 a s d i r i 


Pagine 





L. 1.560.000 

mese 




| Star SR-10 

Aghi 

L. quality 

9x11 

10 

17 



— 

• • 

*■ 

!-! j..j 
« 

Nel mezzo del 

di nostra vit 

in una selva 

80 colonne 
117x414x345 
9,1 Kg 

Standard 200 
Bozza 

2 Kb 

Seriale 

12 


che, la r “- diri 

L. 1.900.000 

Pagine 

mese 





Oki Microline 193 






Aghi 

L. quality 

9x9 


Ne 1 me zzo d< 

132 colonne 

Standard 160 

8 Kb 

•* V fML 

di nostra v 

80x512x275 

Bozza 

Seriale 

H D 

in una seiv< 

6 Kg 



r 

c h e 3 1a2 dir 


Pagine 




L. 1.925.000 

mese 



Citizen 

MSP-25 




— 



Aghi 

L. quality 50 

9x9 

10 


Mei mezzo del 

132 colonne 

Standard 200 

8 Kb 

12 

* « - 

di nostra vit 

90 x 579 x 354 

Bozza 

Parallela 


ri H 

in una selva 

7 kg 




t 

g: h e 3 1 a. -- d i r i 


Pagine 





L. 1.930.000 

mese 




Triumph Adler SE-310 

Ap 

Nel mezzo del c. 

di nostra vita ì 

in una gelva OS' 
che^ la diritt. 


Margherita 
136 colonne 
502x140x400 
11 Kg 

L. 1.940.000 


L. quality 13 

Standard 

Bozza 

Pagine 

mese 


1,5 Kb 
Seriale 


io 

12 


15 


ori c 


btar on*lo 

Aghi 

136 colonne 
117x556x345 
11,1 Kg 

L. 2.350.000 

L. quality 
Standard 200 
Bozza 

Pagine 

mese 

9x11 

16 Kb 

Seriale 

• * 

v »••• 

i-i j. J 
« 

Nel mezzo del 

di nostra vit 

in una selva 

che, la 31 diri 
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guida stampanti 


Stampa 

Formattazione 


Caratteri 

italiani 

Manuale 


Alimentazione Compatibilità Livello Distributore 

programmi rumore 

Compatibilità 

grafica 


I 


N B Q S T 


P G E I A 
TO TV 




lAppleWrltef] j 

a 


u 


[Appl«Wortrjj J 

a 

o 1 



Telav International, 
Via L. da Vinci 43 
Trezzano S/N (MI) 
Tel. 02/4455741 


N B Q S T 


G E I TO 
TV 






Claitron, 

Via Gallarate 211 
Milano 

Tel. 02/3010091 


N B Q S T 


P G E I A 
TO TV 




Technitron, 
Milanofiori, Pai. E/2 
Assago (MI) 

Tel. 02/8242112 


N B Q S T 


P G E I A 
TO TV 




|AppleWrrter] 

0. 


[Appl«Works| 











Telav International, 
Via L. da Vinci 43 
Trezzano S/N (MI) 
Tel. 02/4455741 


N B Q S T 


P G E I 
TO TV 



|AppleWrlterj 


|AppleWorks| 

Ò. 


0. 



u 






Triumph-Adler Italia, 
Viale Monza 263 
Milano 

Tel. 02/25231 


N B Q S T 


G E I TO 
TV 




|AppleWrrter1 

o. 

0 



Q j MAC 

! JO 


MacWrile 




Claitron, 

Via Gallarate 211 
Milano 

Tel. 02/3010091 
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Modello 


guida ^stampanti 


Tipo 

Larg. carrello 
Dimensioni 
Peso 
Prezzo 


Caratteri 
per secondo 
o pagine/minuto 


Matrice 

Buffer 

Collegamento 


Caratteri 
per pollice 


A p 


5500 





^Aghi 

L. quality 80 

9x9 

Nel mezzo del 

136 colonne 

Standard 250 

1 Kb 

di nostra vit 

196x584x458 

Bozza 

Seriale 

in una selva 

14 Kg 



che3 1 a2 diri 


Pagine 



L. 3.870.000 

mese 



10 17.5 

12 


Datasouth DS-220 


Aghi 

132 colonne 
400x600x200 

16 Kg 

L. 4.500.000 

L. quality 
Standard 220 
Bozza 

Pagine 

mese 

9x7 

2 Kb 

Seriale 

fa P 

Nel mezzo del 
di nostra vi. t 
tq.... un a..., se Iva 
che3 la2 diri 



Laser 

L. quality 8 

300x300 

10 

Foglio UNIA4 

Standard 

59 Kb 

12 

475x415x293 

Bozza 

Seriale 


32 Kg 

Pagine 



L. 6.738.000 

mese 4.000 




HP LaserJet+ i 

Ap 

Nel mezzo del cam 
di nostra vita mi ri 
in una selva oscura 
che3 la2 diritta via 


Laser 

L. quality 8 

300x300 

10 

Foglio UNIA4 

Standard 

512 Kb 

12 

475x415x293 

Bozza 

Seriale 


32 Kg 

Pagine 



L. 8.901.000 

mese 4.000 




14.4 

16.7 


14.4 

16.7 



ciser vvruer 

Laser 

L. quality 8 

300x300 

Nel mezzo del ca 

Foglio UNIA4 

Standard 

1,5 Mb 

di nostra vita mi 

474x415x290 

Bozza 

Seriale 

in una selva oscu 

32,5 Kg 

Pagine 

mese 4.000 

AppleTalk 

che 3 la 2 diritta vi; 

L. 14.400.000 



da 

a 


4.5 

100 



)US 1 

Laser 

L. quality 12 

300x300 


Nel mezzo del 

Foglio UNI A4 

Standard 

131 Kb 

dinostra vite 

350x535x510 

Bozza 

Seriale 

in una selva 

57 Kg 



che3 la2 diri 


Pagine 



L. 19.000.000 

mese 20,000 
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Stampa 

Formattazione 


guida stampanti 

Caratteri Alimentazione Compatibilità Livello Distributore 

italiani programmi rumore 

Compatibilità 
Manuale grafica 



B S Q 


P G E I 
TO TV 




Epson-Segj, 

Via Timavo 12 
Milano 

Tel. 02/6709136 




N Q S T 


P G E I A 
TO TV 
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ICS Di 


Apple Computer, 
Milanofiori Pai. Q/8 
Rozzano (MI) 

Tel. 02/8242156 



N Q S 


G C I TO 
TV 
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Facit Data Products, 
Centro Direzionale 
Colleoni-Pal. Orione- 
Ingresso 1 

Agrate Brianza (MI) 
Tel. 039/636331 
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Assenti giustificate 

La tabella che segue fornisce molte informazioni relative ad altre stampanti ancora, il cui 
collegamento con i computer Apple è possibile, ma per ragioni di tempo e di spazio fisico (60 
stampanti, con i loro imballi, occupano una decina di stanze) non è stato possibile procedere a una 
prova accurata con i programmi di base utilizzati per le stampanti presentate nelle pagine precedenti. 


MODELLO 

T 

V 

M 

B 

L 

c 

1 

PREZZO 

PRODUTT. 

IMPORT. 

SEIKOSHA GP 55 AS 

A 

40 

5x8 

l 

46 

FS 

S 

L. 330.000 

G.B.C. 

02/6181801 

SEIKOSHA GP 500 

A 

50 

5x7 

1Kb 

80 

MC 

S 

L. 550.000 

G.B.C. 

02/6181801 

BROTHER M1009 

A 

50 

9x9 

/ 

80 

MC 

S/P 

L 

595.000 

Pereon 

02/8323541 

SEIKOSHA SPI 000AP 

A 

100 

5x7 

/ 

80 

MC/FS 

s 

L 

780.000 

G.B.C. 

02/6181801 

HONEYWELL L11 

A 

80 

11X9 

1Kb 

80 

MC/FS 

p 

L. 900.000 

Honeywell 

02/67791 

CENTRONICS H80 

A 

160 

11x9 

3Kb 

80 

MC/FS 

S/P 

L. 

1.100.000 

Centronics 

02/2537841 

SIEMENS PT88N 

A 

80 

9x9 

opz. 

80 

MC/FS 

s 

L. 

1.200.000 

Siemens 

02/67661 

BROTHER MI509 

A 

45/180 

9x9 

3Kb 

136 

MC 

S/P 

L. 

1.250.000 

Person 

02/8323541 

JUKI 6100 

M 

18 

/ 

2Kb 

132 

FS 

p 

L. 

1.350.000 

Telcom 

02/4047648 

TEXAS 850 

A 

150 

9x9 

256b 

80 

MC/FS 

S/P 

L. 

1.500.000 

Texas Instruments 
02/253001 

SIEMENS PT88T 

G 

150 

9x9 

opz. 

80 

MC/FS 

s 

L. 

1.574.000 

Siemens 

02/67661 

SIEMENS PT89N 

A 

80 

9x9 

opz. 

132 

MC/FS 

s 

L. 

1.5B7.000 

Siemens 

02/67661 

C.ITOH 8510SR 

A 

120/180 

9x9 

2Kb 

80 

MC/FS 

S/P 

L. 

1.600.000 

Adeisy 

02/3580641 

QUME LetterPro 

M 

22 

/ 

256b 

132 

MC 

S/P 

L. 

1.640.000 

Nelson Italia 
055/474904 

CENTRONICS H136 

A 

160 

11x9 

3Kb 

136 

MC/FS 

S/P 

L. 

1.700.000 

Centronics 

02/2537841 

SIEMENS PT89N 

G 

150 

9x9 

opz. 

132 

MC/FS 

s 

L. 

1.824.000 

Siemens 

02/67661 

TEXAS 855 

A 

35/150 

9x9 

256b 

80 

MC/FS 

S/P 

L. 

2.100.000 

Texas Instruments 
02/253001 

C.ITOH 1550SCR 

A 

180 

9x9 

2Kb 

136 

MC/FS 

S/P 

L. 

2.250.000 

Adeisy 

02/3580641 

HONEYWELL 34CQ 

A 

240 

11x9 

4Kb 

132 

MC/FS 

S/P 

L. 

2.500.000 

Honeywell 

02/67791 

ANADEX DB9000B 

A 

150/240 

9x9 

3.5Kb 

80 

MC 

S/P 

L. 

2.648.250 

Transpan 

02/2042541 

ANADEX DB9725B 

A 

120 

col. 

3.5Kb 

132 

MC 

S/P 

L. 

3.572.250 

Transpart 

02/2042541 

QUME Sprlnt11/40+ 

M 

40 

/ 

500b 

196 

MC 

S/P 

L. 

3.910.000 

Nelson Italia 
055/474904 

DIABLO 630 

M 

40 

/ 

1.3Kb 

88 

FS 

S/P 

L. 

7.000.000 

02^709136 

DATAPRODUCT M200 

A 

340 

7x7 

1Kb 

132 

MC 

S/P 

L. 

7.200.000 

Dataproduct 

02/8245331 

CANON LBP-8 Al 

L 

8 p/m 

/ 

128Kb 

/ 

FS 

S/P 

L. 

7.500.000 

Canon 

02/2130241 

CENTRONICS LW800 

N 

800 r/m 

/ 

/ 

136 

MC 

S/P 

L. 18.500.000 

Centronics 

02/2537841 

OLIVETTI DM 4100 

A 

120 

9x9 

256b 

132 

MC 

S/P 


Olivetti OPE 
0125/230085 

DATAPRODUCT M100 

A 

140 

9x14 

4Kb 

132 

MC 

S/P 


Dataproduct 

02/8245331 

OLIVETTI DM 5055 

A 

120 

9x9 

1Kb 

80 

MC/FC 

S/P 


Olivetti OPE 

0125/230085 

JUKI 5520 

A 

180 

9x9 

3Kb 

80 

MC/FS 

S/P 


Telcom 

02/4047648 


Legenda: V = velocità (dove non indicato, s'intende carattere per secondo): p/m = pagine al minuto; r/m = righe al minuto. M 
= matrice d'aghi. B = buffer. L = larghezza carta in colonne C = carta: MC = modulo continuo, FS = foglio singolo. I = 
interfaccia: S = seriale, P = parallela (solo per Ile). T = tecnica di stampa: A = aghi, M = margherita, G = getto d'inchiostro, L = 
laser, N = nastro. Dove il prezzo non è indicato, varia a seconda della configurazione. 




















































Tutti sanno quanto è utile un data base quando si tratta di catalogare gli 
oggetti più disparati. Se poi il data base può “vedere” gli oggetti in questione 
e memorizzarne l'immagine al suo interno, allora non c’è dubbio che... 


Il catalogo lo 
stampo da me 


Il problema di preparare e stampare 
il catalogo dei prodotti che un'azienda 
commercializza è sicuramente tra i più 
diffusi. Prima dell’avvento del per¬ 
sonal computer ognuno lo risolveva a 
modo suo. Chi aveva la possibilità, 
perché all'interno della propria azien¬ 
da esistevano gli strumenti adatti, usa¬ 
va il centro EDP a questo scopo. Gli 
altri dovevano ricorrere a strumenti 
più artigianali e complicati, che non 
permettevano certo una gestione agile 
di tutta la faccenda. Da qualche anno a 
questa parte, molte cose sono cambia¬ 
te, e l'avvento del personal, con i pro¬ 
grammi di data base, ha dato un vali¬ 
do aiuto in questo settore. Tuttavia, 
chi ha l'esigenza di preparare il 
proprio catalogo in forma diversa dal 
tabulato, è costretto a fare un doppio 
lavoro: l'aggiornamento del data ba¬ 
se, per poi procedere alla realiz¬ 
zazione del catalogo con strumenti 
più classici, cioè la ricomposizione 
tipografica dei dati contenuti nel 
calcolatore. 

Oggi Macintosh e le stampanti la¬ 
ser, in particolare la LaserWriter, 
permettono una certa autonomia nella 
soluzione di questo specifico proble¬ 
ma. Il vantaggio è evidente: se si rie¬ 
sce a saltare la fase della composi¬ 
zione tradizionale, non solo si evita 
un doppio lavoro, ma tutti i dati pos¬ 
sono essere rimaneggiati e ristampati 
agevolmente per avere cataloghi pron¬ 
ti in tempi più stretti e, soprattutto, 
diventa fattibile la stampa del cata¬ 
logo non una volta l'anno, bensì o- 
gni volta che se ne ha la necessità. 
Infatti tra le frasi più ricorrenti che 
riguardano i cataloghi figurano sicura¬ 
mente: “Non è ancora pronto”, “Lo 
stiamo stampando in questi giorni”, 
“Queste variazioni non sono ripor¬ 
tate, perché sono successive alla 



stampa del catalogo”... e così via. 

Il catalogo, inoltre, molto spesso è 
formato da testo e da un'immagine di 
prodotto; ebbene, oggi è fattibile cre- 



Fiqura 1 (in alto) e figura 2: una 
volta deciso il layout, lo si defi¬ 
nisce con il Form del data base. 


are con un Macintosh un catalogo 
con queste prerogative. Naturalmente 
non si ottiene la medesima qualità 
che si otterrebbe dalla riproduzione di 
una fotografia, ma molto spesso la ve¬ 
locità e la tempestività sono più im¬ 
portanti. 

Cosa occorre 

Il sistema più completo prevede un 
Macintosh 512 Kb (5.299.350, iva 
esclusa), un hard disk (3.500.000, iva 
esclusa), una telecamera(l milione cir¬ 
ca, ma esistono soluzioni più econo¬ 
miche, vedi il box alla pagina seguen¬ 
te, la stampante laser (14.400.000 
iva esclusa) e due pacchetti di soft¬ 
ware: un data base e un programma di 
gestione immagini via telecamera. I 
software in questione sono Micro- 
softFile (512.000, iva esclusa) e Mac- 
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SHOP 


MONFALCONE (GO) 

Via S. Giacomo 30 - Tel. (0481) 44260 


— QUOTAZIONI SPECIALI — 
[^NOVE^1BRIE^-^DICEMBRE_ 

Tutte le schede e periferiche per Apple! e 
quando diciamo TUTTE significa che 
disponiamo anche di quelle che non si trovano 
sul mercato italiano! 

Qualche esempio: 

MODEM 300-600-1200 BAU D full 
duplex con VIDEOTEL per collegarsi a 
tutte le banche dati (pagine gialle elettroniche 
comprese)._Lire 300.000 




SPECIALE PER MUSICISTI: 

S&H scheda di campionamento 
vocale e sonoro per la sintesi di qualsiasi 
suono registrato con un microfono, completo 
di batteria elettronica programmabile. 

Lire 350.000 


BETA SYNTAURI sistema musicale 
POLIFONICO completo di tastiera 
professionale a 5 ottave, 2 pedali di 
espressione, 2 maxischede di sintesi, I 
REGISTRATORE DIGITALE A 16 PISTE 
incorporato derivato da Alpha Syntauri®. 
_ Lire 1.450.000 

SPECIALE PER GRAFICI, 

ARCHITETTI. INGEGNERI: 

C.A..D. sistema grafico 
professionale per il disegno e la 
progettazione assistita dal calcolatore, 
composto da scheda 128 K RAM; joystick 
professionale, software applicativo e manuale 
in italiano. Derivato da ROBO 1500®. 
_Lire 980.000 

Penna grafica per disegnare direttamente 
su schermo video qualsiasi tipo di grafica, 
ottima per COMPUTER ART. Completa di 
software. Derivata da Gibson Light Pen®. 
_ Lire 180.000 

Tavoletta grafica formato B4 per 
digitalizzare qualsiasi disegno o schema 
elettrico, oppure per disegno a mano libera. 
Completa di software e manuale italiano. 
_Lire 250.000 

Joystick speciali per Apple 11+ con 2 trimmer 
e 2 pulsanti._Lire 43.000 

Driver Slim trazione diretta (i più affidabili)k 
per Apple + e Ile)._Lire 390.000 

Mouse per Apple 11+ e Ile completo di 
software grafico. Lire 145.000 

FANTASTICO! Dischi per Apple 5" 


UN OCCHIO PER MACINTOSH 

L'utilizzo dei programmi di riproduzione delle immagini come Mac- 
Vision oppure Magic comportano il collegamento di una telecamera al 
Macintosh attraverso una opportuna interfaccia. Questa telecamera 
potrebbe sembrare un grosso handicap del sistema soprattutto da pun¬ 
to di vista del costo generale. Esistono tuttavia delle soluzioni estrema- 
mente economiche per risolvere il problema. La prima soluzione è data 
dall'espansione continua del mercato dei videoregistratori: è infatti pos¬ 
sibile utilizzare la telecamera che normalmente si collega al videore¬ 
gistratore per ottenere immagini perfette. Queste telecamere normal¬ 
mente non hanno una propria alimentazione (prendendola direttamente 
dal videoregistratore) e forniscono il segnale video su connettori piut¬ 
tosto strani e non facilmente reperibili. Tuttavia ci sono due soluzioni a 
questi problemi: la prima soluzione si attua collegando la telecamera al 
videoregistratore e mandando poi il segnale video (non il segnale per il 
collegamento alla TV che è in radiofrequenza), in uscita da que¬ 
st'ultimo, direttamente all'interfaccia per Macintosh. Questa soluzione 
consentirà oltretutto di collegare al video registratore un televisore con 
il quale sarà possibile effettuare una piu perfetta messa a fuoco 
dell'immagine. Il tutto in maniera praticamente gratuita. La seconda 
soluzione ha un costo che è quello dell'alimentatore per la telecamera. 
Ogni produttore di telecamere amatoriali produce infatti un alimentatore 
separato per le proprie telecamere, che consente, oltre a fornire la cor¬ 
rente di alimentazione, di separare i vari segnali di controllo da quelli vi¬ 
deo che potranno così essere collegati direttamente all'interfaccia per 
Macintosh. Il costo di questi alimentatori si aggira intorno alle 150/200 
mila lire. Nel caso non si disponga di una telecamera amatoriale, 
bisogna sapere che esistono delle telecamere in bianco e nero molto 
economiche che svolgono egregiamente questo tipo di lavoro. Sono le 
telecamere per antifurti: il loro costo parte dalle 250 mila lire e arriva 
alle 600 mila (vanno aggiunte solo 50 mila lire di alimentare). Una delle 
società che in Italia produce la maggior parte delle telecamere per 
antifurto è la Bitron Video di Grugliasco - Torino (Strada del Portone 95 
tei. 011/7802321) alla quale ci si può rivolgere per avere l'indirizzo del 
loro concessbnario più vicino. 


Vision (684.000 lire, iva esclusa). 

E' possibile risparmiare diversi mi¬ 
lioni solo se le esigenze sono molto 
ridotte: per esempio, al posto della la¬ 
ser si può usare una stampante ad a- 
ghi, e se il catalogo che si deve pre¬ 
parare non è molto lungo, si può fare 
a meno deU'hard disk. 

In ogni caso, se si raffrontano i co¬ 
sti sostenuti per la preparazione di un 


catalogo, nella maggior parte dei casi 
si constata che, nel giro di un paio di 
edizioni del catalogo in questione, la 
spesa iniziale è stata ammortizzata. 
Risolto il problema economico, resta 
il piacere di avere tutti i dati sul 
computer, dove le variazioni vengono 
effettuate con la massima semplicità, 
senza dover rifare tutto il lavoro. 

MicrosoftFile permette la gestione 


utilizzabili sulle due facce 5 anni di 
garanzia mod. NASHUA MD1. Lire 3.100 
Foradischi utilissimo accessorio per 
sfruttare la seconda faccia del dischetto. 

Lire 12.900 

PREZZI IVA COMPRESA 

Inoltre: Schede di espansione di qualsiasi tipo, 
Centronics, Seriali RS 232, CP/M, 
Input/output, orologio, colore, 80 colonne ecc 

RICHIEDETECI IL NOSTRO 
CATALOGO GRATUITO 
CON I PREZZI PROMOZIONALI 


Attenzione! Tutti i nostri prodotti 
sono garantiti con il sistema 
della sostituzione immediata in 
caso di guasto. 

Per qualsiasi informazione tecnica siamo a 
vostra disposizione al numero telefonico 

(0481) 44260 

Merce pronta consegna. 
Accettiamo ordini telefonici 
allo (0481) 44260. 

Spedizione gratuita per importi superiori 
a L. 90.000. Imballo gratuito. 

•marchi registrati 


0 . 



TUOI 

- 



.finora 


i- 


Formot Picture Field 


Nume: 


Display —i 
OCMp 
® Scale 


rStyle- 

fé] Border_ 






Il campo in 
questione 
risulta incorniciato 
da un filetto 

Definisce il disegno 
ridotto in scala 
oppure tagliato nella 
misura prestabilita, 
con scelta quindi di 
un particolare 


Figura 3. 








































































PER IL TUO APPLE //e & //«. 


Vi piacciono le regate? O preferite esplorare le caverne dell’Olimpo? Oppure vorreste 
avere sul vostro schermo il fantastico gioco della scimmia che scappa arrampicandosi sulle 
pareti lisce di un grattacielo? Siete invece tipi riflessivi e vi dilettate di musica? Non 
preoccupatevi, qui c’è sicuramente quello che fa per voi. Per gli amanti di tanti giochi tutti 
insieme è disponibile una raccolta. Per chi vuole migliorare le proprie capacità di 
programmatore, ecco i trucchi del Basic su dischetto. E tante altre offerte, a prezzi eccezionali. 



BASIC TRICKS FOR THE APPLE. 

35 routine che renderanno molto 
più professionali i vostri pro¬ 
grammi in Basic e che vi sarà 
facilissimo imparare utilizzando il 
manuale e il dischetto offerti in 
elegante confezione a sole 
60.000 lire. 



SPUD e MUG SHOT. Il primo po¬ 
ne due giocatori in antagonismo 
tra loro, il secondo può essere 
giocato da un solo giocatore fino 
a quattro giocatori. Graficainalta 
risoluzione spettacolare. Richie¬ 
de l'uso delle paddle. Dischetto 
con programma e manuale offerti 
in elegante confezione a sole 
50.000 lire. 



PEN PAL. Un word processor 
che può svilùppare fino a 254 
colonne per riga, con possibilità 
di serali orizzontale e verticale. 
Giustificazione, numerazione 
delle pagine, intestazioni. Cerca 
e rimpiazza testo. Possibilità di 
editing di programmi in Basic. 
Predisposizione per invio via mo¬ 
dem dei testi. Dischetto con pro¬ 
gramma e manuale in elegante 
confezione a 60.000 lire. 



INSTANT RECALL. Un potente 
Data Base i cui file singoli posso¬ 
no superare i 28.000 caratteri. 
Accesso simultaneo a 8 file, per 
un totale di oltre 229.000 caratte¬ 
ri. Ogni file può essere caricato in 
5 secondi. Ricerca velocissima. 
Campi determinabili dall’utente. 
Possibilità di editing sofisticato. 
Dischetto e manuale offerti in ele¬ 
gante confezione a sole 60.000 
lire. 



APPLE GAMES. 11 giochi: Flip-Flop, 
Mastermind, Towers, Sherlock's home. 
Attack of thè Zargons, Phaser Practice, 
Acey-Ducey, Big government, Tic-Tac- 
Toe, Qubic, Depth charge. E tre pro¬ 
grammi di utilità: Shape table generator, 
Opening ceremonies, Master catalog. 
Per alcuni giochi sono richieste le padd¬ 
le o il joystick. Dischetto con program¬ 
ma e manuale in elegante confezione a 
60.000 lire. 



APE ESCAPE. Una scimmia è 
fuggita dallo zoo e si arrampica di 
finestra in finestra lungo le pareti 
di un grattacielo. Elicotteri le ron¬ 
zano attorno e il guardiano dello 
zoo la insegue. Riuscirà a rag¬ 
giungere il tetto e la libertà? Gra¬ 
fica a colori. Dischetto con pro¬ 
gramma e manuale in elegante 
confezione a sole 50.000 lire. 


BERMUDA RACE. Un'esaltante 
regata nella quale voi siete al co¬ 
mando di una barca con quindici 
uomini d'equipaggio. Tutto di¬ 
pende dalla vostra abilità di skip¬ 
per. Il programma è ampiamente 
documentato su Applicando n. 
17, Giugno 1985. Dischetto con 
programma e manuale in elegan¬ 
te confezione a 50.000 lire. 


CAVES OF OLYMPUS. Oltre a 
una grafica a colori ultraprofes¬ 
sionale, questo gioco di abilità 
sfodera suoni ed effetti speciali di 
qualità nettamente superiore. Di¬ 
vertente, intrigantee irresistibile. 
Dischetto con programma e ma¬ 
nuale in elegante confezione a 
sole 50.000 lire. 


MUSIC GAMES. 12 programmi 
educativi e divertenti sul filo delle 
7 note. Senza bisogno d'altro, il 
vostro Apple si tramuterà in un 
docile strumento musicale dal 
quale imparare e col quale diver¬ 
tirsi. Sono richieste le paddle o il 
joystick. Dischetto con program¬ 
ma e manuale in elegante confe¬ 
zione a sole 50.000 lire. 


REGATTA. Un gioco entusiasmante che 
farà impazzire marinai esperti e meno 
esperti di qualunque età. Ogni concor¬ 
rente ha a disposizione una barca e un 
circuito. Poi ci sono i venti, gli ostacoli, 
gli imprevisti... Una grafica realistica vi 
farà volare tra le onde. Il programma è 
ampiamente documentato su Applican¬ 
do n. 17, Giugno 1985. Dischetto con 
programma e manuale in elegante con¬ 
fezione a sole 50.000 lire. 




Compilare e spedire il tagliando qui sotto a Applicando, Edltronica Srl., Corso Monforte 39, 20122 Milano 


Sì! Inviatemi subito, senza aggravio di spese 
postali, il o i programmi contrassegnati con 
una crocetta. 

□ REGATTA. 50.000 lire. 

□ CAVES 0F OLYMPUS. 50.000 lire. 

□ APE ESCAPE. 50.000 lire. 

□ MUSIC GAMES. 50.000 lire. 

□ APPLE GAMES. 60.000 lire. 

□ BASIC TRICKS FOR THE APPLE. 60.000 lire. 

□ BERMUDA RACE. 50.000 lire. 

□ INSTANT RECALL. 60.000lire. 

□ PEN PAL. 60.000 lire. 

□ SPUD e MUG SHOT. 50.000 lire. 


Cognome.Nome... 

Via.Cap. 

Città. Prov. 

Scelgo la seguente formula di pagamento: 

□ allego assegno di L.non trasferibile intestato a Editronica srl. 

□ allego ricevuta versamento di L.sul cc/p n. 19740208 intestato a 

Editronica srl - Corso Monforte, 39 - 20122 Milano 

□ pago fin d'ora l'importo di L.con la mia carta 

di credito BankAmericard N... 

scadenza.autorizzando la Banca 

d’America e d'Italia ad addebitarne l’importo sul mio conto BankAmericard. 


Data 


Firma 


































































Figura 5 

é File Fdit Form Organile 


riniti 



combinata di testo e immagini. Pren¬ 
diamo come esempio pratico un cata¬ 
logo composto dal nome del prodot¬ 
to, dalla descrizione, dal numero di 
codice e daH’immagine del prodotto 
stesso. Per prima cosa bisogna deci¬ 
dere il layout di ogni scheda tipo che 
comporrà il catalogo (figura 1), que¬ 
sto layout viene creato usando l'o¬ 
pzione “form” di MicrosoftFile 
(figura 2), all'interno della quale si 
decide anche quali campi devono esse¬ 
re numerici, contenere testo o immagi¬ 
ni . Le immagini possono essere un 
particolare del prodotto, oppure tutta 
la sua riproduzione ridotta in scala 
nello spazio appositamente creato per 
contenerla (figura 3). Inoltre è pos¬ 
sibile definire corpo e carattere del te¬ 
sto contenuto nei campi (figura 4). 
Naturalmente non manca l'opzione di 
ricerca o ordinamento secondo uno o 
più campi (figura 5). 

L'immagine deve essere ripresa in 
precedenza con un software del tipo 
MacVision e contenuta in un file di 
MacPaint, oppure può essere un dise¬ 
gno effettuato con MacPaint, Mac- 
Draw o programmi similari. 

A questo punto si è pronti a inserire 
i dati scheda per scheda. Alla fine, a 
seconda delle esigenze, le schede 
possono essere ordinate a seconda del 
titolo, oppure del codice, e pronte per 



McGrawHill 


Casa editrice 
americana con 
sedi in vari paesi 
del mondo, tra 
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in particolare, 
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riguardanti i 
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computer. 
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Figura 6 


Prima 


Mensile (11 
numeri l'anno). 
Responsabile: 
Umberto 
Brunetti. Data di 
copertina: il 
mese.Tiratura: 
13.000 copie. 
Diffusione: 9.000 
copie di cui 2.300 
in abbonamento. 
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personal 
computer 
Commodore e 
Spectrum. 
Pubblica listati di 
programmi utili e 
“intelligenti”. 






essere stampate. Il formato di stampa 
dipende dal layout inizialmente stabi¬ 
lito; nella figura 6, l'esempio che 
mostriamo presenta un formato parti¬ 
colare, ben diverso dal solito Uni A4. 

Non resta ora che stampare il cata¬ 
logo nel numero delle copie deside¬ 
rato: se sono molte, conviene fare i 
typon dall'originale, per poi affidarsi 


a uno stampatore, se si tratta di po¬ 
che decine di copie, può essere suffi¬ 
ciente stamparle tutte con la laser. Il 
fatto poi che una volta impostato pos¬ 
siate stampare una versione aggio¬ 
rnata del catalogo senza dover riper¬ 
correre tutto l'iter, è sicuramente un 
vantaggio che ben pochi strumenti 
(certo più costosi), possono offrirvi. 
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Ora che conosci il segreto del suo 
sorriso, cera di non dimenticarlo. 



Vi auguriamo migliaia di questi sorrisi, 
tutti indimenticabili. Perchè con Dentstar 
non vi sarà più possibile dimenticare nulla! 
Dentstar è il programma gestionale ideato 
da un dentista e sviluppato da EMS, Euro- 
pean Society of Medicai Software, per i per¬ 
sonal computer della famiglia Apple® II. 

Con Dentstar è facile tenere sempre sotto 



controllo la situazione dei pazienti, sotto il 
profilo contabile e clinico; potete inoltre 
controllare separatamente l’attività di più 
medici presenti in uno stesso studio. 

Dentstar soddisfa tutte le esigenze di 
gestione di uno studio dentistico, inclusa 


l’agenda degli appuntamenti, la situazione 
degli insoluti ed il sollecito per le visite 
periodiche. 

Il metodo esclusivo EMS permette inoltre di 
visualizzare la situazione dentaria dei vostri 
pazienti su una simulazione di ortopanto- 
mografia. 

In base allo sviluppo della vostra attività 


potete variare la configurazione del sistema 
Apple II: scegliete la compattezza di Apple 
Ile, oppure la modularità di Apple Ile ed 
espandere il sistema aggiungendo man ma¬ 
no le periferiche più appropriate, fino a po¬ 
ter gestire 7.500 cartelle-pazienti. 

Senza dimenticare mai un nome, o una 
fattura... o un sorriso. 

Apple Computer 



Apple e il munbw Apple sona marchi registrati dalla Apple Computer lncJ)entstar è un marchio registrato di EMS 
















One-liners 

Ecco quali sono i vincitori di questo numero e (ci scusiamo per non aver pubblicato prima i loro nomi) del numero scorso: 
Marco Balbi, Luigi Battaglini, Alessandro Bonzi, Luigi Bruno, Marcello Bulliani, Fabio Camponeschi, Giorgio Di Falco, 
Roberto Ferrerò, Alessandro Gori, Marco Guerrini, Diego Lagunas, Umberto Migliore, William Pavesi e Fabio Rumiz. A 
tutti è già stato inviato il dischetto chiesto in premio: congratulazioni. 



E cco un calendario perpetuo rela¬ 
tivo al nostro secolo. Alla richie¬ 
sta di input (?) rispondete indicando le 
ultime due cifre di giorno, mese e anno 
(per esempio: 20,10,84). Otterrete il 
nome del giorno della settimana corri¬ 
spondente. 


(D 

in 


O 

H 

< 

h“ 

C/> 


DATA VENERDÌ',SABATO,DOMENICA. 
LIM.MART,HERC0L,6I0V,31,59.9 
0,120,151,181.212,243,273,30 
A,33A: DIM G$(17)i F0Ó 1 = 0 
TO 17: READ Gi(I): NEXT : INPUT 
G,M,A:X = 365 * A + 'VAL (Gl 
(H + 5)) 4 G + (A / 4 = INT 
(A / 4)) 4 INT ((A - 1) / 4 
) 4 2:X = X - 7 * INT (X / 

7): PRINT Gi'X) M1D* CEDI" 

,1,4 4 (X ) 2)) 


Questo one-liner calcola la diffe¬ 
renza giorni tra due date e il relativo 
bioritmo in quel giorno. La prima data 
richiesta è quella del giorno presente, 
la seconda è la data di nascita. Il com¬ 
puter indicherà la differenza tra i gior¬ 
ni, e la posizione delle tre curve del 
bioritmo per il giorno scelto (fisico, 
emotivo, intellettivo): da 0 a 1 = alta; 
0 = media; da 0 a —1 = bassa. 


o 

H- 

< 

t— 

CO 


10 E = E 4 1:F = 0: PRINT 'DATA 1 
E 1 (GG,ltl,AAAA):‘:: INPUT ” 
;A,B,C:D = INT <3<45.25 » <C 
- (B < = 2))) 4 INT (30.6 
001 * (B 4 13 * (B < = 2) 4 
(B > 2») 4 A: 0N E = 1 GOTO 
10:G = F - D: PRINT , DIF= , G: 
F0R 1 = 23 T0 33 STEP 5: PR] 
INT ((100 * SIN <(G / I - 
INT <G / D) * 6.28)) 4 .5) 
/ 100: NEXT 


Ecco un preciso contasecondi. Parte 
automaticamente e si ferma al tocco di 
un tasto, indicando il tempo trascorso. 
Può essere usato come provariflessi. 


< 

H 

C/> 


TEXT : HOME : VTAB 1: HTAB 37: 
PRINT '0000' : P0KE 34,1: DATA 
162.4.169.15.32.168,252,254, 
35,4,173.6,192,201.127,16,17 
,189.35,4,201,186,208,232,16 
9,176,157,35,4,202,224,0,208 
,224,96: F0R T = 768 TÓ 802: 
READ A: POKE T,A: NEXT : F0R 
T = 1 TO 100 4 RND (1) * 30 
0: NEXT : CALL 768 


Calcola le radici di un’equazione di 
secondo grado a partire dai coefficien¬ 
ti a,b,c di ax 2+bx+c=0. Se però le 
radici sono immaginarie, il program¬ 
ma si blocca con un "?illegal quantity 
error". 


o, 1 HOME : VTAB 7: PRINT ‘INTRODUC 
>n I 1 COEFFICIENTI:■: PRINT 'A 

O XX+BX4C=0" : PRINT : INPUT “A 

K =' ;A: INPUT *B= , iB: INPUT ‘C 

< =';C:S = SOR (B * B - 4 * A 

fo 4 C):D = 2 4 A: PRINT : PRINT 

■Xl='( - B - S) / 0: PRINT 1 
X2='( - B 4 S) / D 


Ecco un piccolo esempio di quello 
che si ottiene operando con figure di 
dimensioni maggiori della pagina gra¬ 
fica. 


FOR I = 1 TO 13: READ A: POKE 
767 4 1 A: NEXT : POKE 232,0 
: POKE 233,3: DATA 1,0,4,0,3 
6,45,45,54,54,63,63,36,0:1 = 

10: HGR2 : HCOL0R= 3: R0T= 0 
: FOR Y = 95 TO 150 STEP li FOR 
X = 30 TO 270 STEP 1 : SCALE= 

I: DRAU 1 AT X,Y: XDRAU 1 AT 
X,Y: I = I 4 1 - INT (1 / 25 
5) 4 255: NEXT : NEXT 


Questo programmino scompone e 
ricompone una qualsiasi parola me¬ 
morizzata nella variabile a$ e termina 
scrivendola alla rovescia. 


Questo one-liner, come è spiegato 
nel programma stesso, effettua il cal¬ 
colo degli integrali. I numeri richiesti 
vanno inseriti di seguito separati da 
una virgola. 


1 HOME : INPUT ‘INIETTI:‘;A*:A = 
LEN (A*) : HOME : FOR I = I TO 
„ A: PRINT LEFTt (A»,I): NEXT 

g : GET Bt: HOME : FOR I = 1 TO 

o A: PRINT RIGHT» (A$,I): NEXT 

H : GET B$: HOME : FOR I = 1 T0 

< A: PRINT MIO» <A*,I): NEXT 

: GET Bi: HOME : FOR I = 1 TO 
52 A: PRINT M1D9 <A*,I,1): NEXT 

- 1 : GET 8*: HOME : FOR I = A TO 

1 STEP - 1: PRINT MIO* (A* 
,1,1);: NEXT : GET B$ 


Ecco come in una sola riga è possibi¬ 
le simulare l’estrazione del lotto sulle 



10 PRINT TAB( 12)‘CALCOLO INTEG 
RALI ■ : DEF FN F(X) = X J 2 / 

5 4 2: PRINT : PRINT ‘IMMETT 
ERE ESTREMI A E B DI INTEGRA 
2IONE, E NUMERO DEGLI INTERV 
ALLI SU CUI EFFETTUARE IL C 
ALC0L0 N‘: INPUT A,B,N:D = ( 

B - A) / N: FOR I = 0 T0 N - 
1 :S = D 4 FN F(A 4 I 4 0 4 
D / 2) 4 S: NEXT : PRINT : PRINT 
■L'INTEGRALE E' ’;S 


Questo semplice gioco metterà a 
dura prova i vostri riflessi. Si tratta di 
uno slalom: le frecce destra e sinistra 


IO ruote. 


t- 1 HOME : PRINT 'ESTRAZIONI DEL L 
“ OTTO 1 : PRINT : FOR 1 = 1 TO 

O 10: PRINT ‘RUOTA N.’;I;:X = 

b 13: FOR L = 1 TO 5:N = INT 

K (90 4 RND (1) 4 1): HTAB X: 

W PRINT N;:X = X 4 3: NEXT L: 

J PRINT : NEXT I: END 


Breve routine con la quale si può 
effettuare l’animazione di parole sul 
video in pagina di testo. Gira sul Ile e 
sul //e predisposto per i caratteri del 
mouse. 


2 A(9) = 160: HOME : FOR 1 = B T0 
cv 0 STEP - liA(I) = PEEK ( - 

40 (I 4 757)): NEXT : FOR V = 1 

O TO 24: FOR 0 = I TO 40:P = 

b (V 4 128) - INT ((V - 1) / 

2 8) 4 984 4 o 4 895: FOR I = 

5j 9 TO 0 STEP - 1: POKE P,A(I 

j ):P = P 4 l 4 ((0 < 30) OR ( 

V < 16)): NEXT 1,0,V 


spostano il cursore di 45 gradi rispetti¬ 
vamente a destra e a sinistra, mentre la 
barra spazio lo fa proseguire diritto. 
Urtando un asterisco, il programma 
termina e fornisce il numero delle li¬ 
nee percorse. Buon divertimento! 



1 VTA8 24 :A 

= 1920:1 = I 4 li 

PRINT 


TAB( 1 

4 39 4 RND <!))■* 


IO 

K= PEEK (49152) :X = X 4 

<K 

co 

= 149) 

4 (X < 38) - (K = 

13 

O 

6) 4 (X 

) 0): POKE A 4 X, 

PEEK 

h- 

(A 4 X) 

- 128: ON PEEK (A 

l 4 

< 

i— 

X) < > 

42 GOTO 1 : FOR J = 

1 

c n 

TO 10 :f 

> = PEEK (49237) 4 

PEEK 

_i 

(49236): 

: NEXT : PRINT ‘CRASH 


DOPO ■] 

[‘ LINEE 1 : FOR J = 

1 TO 


3E3: NEXT : HOME : RUN 



Cento programmi one liner sono dispo¬ 
nibili su dischetto. I prezzi e le modalità 
d’ordine di questo e degli altri dischetti 
disponibili sono riportati nella rubrica 
Disk Service. 
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SUPER 

LIBRI 



PER II, Ile, Ile 

MACINTOSH 



Il Basic e gli Apple II in pratica. Questo volume 
accompagna gradualmente l'utente, al quale 
non è richiesta alcuna conoscenza matematica 
o informatica di base, dai primi approcci alla 
tastiera fino alla completa padronanza del com¬ 
puter e della programmazione. È il lettore a 
decidere se passare al successivo capitolo o 
ritornare ad approfondire quanto gli è stato 
appena spiegato. 310 pagine, 28.000 lire 



Il Multiplan per il Macintosh. Oltre la pura 
semplice descrizione del funzionamento del fo¬ 
glio elettronico, introduce l'utente all'uso di 
uno strumento di lavoro integrato che permette 
di svolgere una quantità insospettabile di attivi¬ 
tà diverse in ogni area del lavoro d'ufficio o nella 
professione: modifiche, tagli, spostamenti, ri¬ 
montaggi, dal bilancio di una società al campio¬ 
nato di calcio. 210 pagine, 26.000 lire. 



Il manuale ProDOS. Il ProDOS costituisce un 
significativo passo avanti rispetto al diffuso ma 
ormai un po’ invecchiato DOS 3.3. Questo ma¬ 
nuale introduce ai numerosi e complessi aspetti 
del ProDOS, dedicando particolare attenzione 
alla struttura ad albero dei directory, alla com¬ 
patibilità con il DOS 3.3 e con il SOS e alla 
programmazione in Basic Applesoft sotto Pro¬ 
DOS. 200 pagine, 25.000 lire. 



Il Basic Microsoft. Il libro comprende un'anali¬ 
tica descrizione dell'uso di tutte le istruzioni, 
funzioni, comandi e operatori, organizzata in un 
vero e proprio corso di programmazione: loop, 
array, gestione di stringhe, formattazione del¬ 
l'output, subroutine, debugging, uso dei me¬ 
nu, gestione dei file ad accesso casuale e se¬ 
quenziale, file di chiavi e puntatori. Ricchissima 
documentazione esemplificativa. 432 pagine, 
38.000 lire. 



Genitori nell’era del computer.ln che modo è 
possibile servirsi del computer nell’educazione 
dei figli? In che misura il computer cambierà la 
scuola? Qual è il software più adatto a stimolare 
la creatività dei bambini? A queste domande - e 
ad altre ancora - Pter Scharf dà delle risposte 
basate sulla sua esperienza in famiglia (quattro 
figli maniaci del computer) e nelle scuole statu¬ 
nitensi. 256 pagine, lire 19.000. 
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McGraw-Hill 


Computer Graphics. L'approccio seguito da 
Harrington rende accessibile il libro a un pubbli¬ 
co con basi matematiche elementari e concate¬ 
nando la spiegazione dei vari algoritmi in modo 
da portare il lettore anche alla realizzazione di 
un package grafico ben costruito e basato su 
concetti di standardizzazione delle funzioni. 
520 pagine, 39.000 lire. 



Pascal. Guida per programmatori. Il libro può 
essere usato per un corso intermedio da coloro 
che scrivono programmi più avanzati, ma il suo 
fine principale è quello di servire come libro di 
testo per l'autoapprendimento, poiché esso of¬ 
fre una trattazione esauriente del Pascal e una 
descrizione fedele e precisa del linguaggio stan¬ 
dardizzato dall’ISO e dagli isituti nazionali di 
standardizzazione. 292 pagine, 29.000 lire. 













Programmazione umanizzata in Applesoft. 

Riassume tutte le tecniche che vengono comu¬ 
nemente impiegate dagli esperti di software per 
rendere più amichevoli i programmi. Vengono 
infatti affrontati tutti gli aspetti di queste tecni¬ 
che: sia quelli interni al software, come routine 
a prova d’errore o di formattazione dell'Input, 
sia quelli esterni, come la documentazione e i 
manuali operativi. Il libro include un quiz mne¬ 
monico e un'agenda telefonica. 208 pagine, 
21.000 lire. 





Grafica e animazione con gli Apple //. Questo 
libro vuole guidare gli appassionati nella com¬ 
plessa materia della grafica e dell'animazione, 
prendendoli per mano dai primi rudimenti attra¬ 
verso numerosi esempi e applicazioni, fino a 
una completa comprensione dei principi e dei 
metodi della computer graphics. Gli esempi 
sono applicati alla famigla degli Apple//: Il Plus, 
//e e Ile. 160 pagine, 17.000 lire. 



Il Basic Applesoft. In 16 capitoli, un metodo 
graduale che non presuppone alcuna cono¬ 
scenza di base. Tra gli argomenti trattati: uso 
interattivo del computer, sintassi dei comandi 
DOS, formattazione dell’input e dell'output, ar- 
ray, selezione e ordinamento dei dati, grafica a 
bassa e ad alta risoluzione, trattamento dei file 
su disco, debugging, riepilogo delle istruzioni, 
comandi e funzioni Applesoft. 232 pagine, 
19.000 lire. 



Guida al Macintosh. Fin dal primo approccio, il 
Mac è molto amichevole, e offre sul video una 
scelta tra varie opzioni, rappresentate da icone. 
In questo modo l'utente può scegliere una o più 
di queste funzioni potendo tranquillamente 
ignorare ciò che avviene all'interno della mac¬ 
china e superando così la naturale diffidenza 
che a volte i computer ispirano. Lo strumento 
fondamentale per questo rapporto amichevole 
con il Mac è il mouse. 224 pagine, 22.000 lire. 


Il manuale MC68000. La famiglia di questo 
microprocessore trova un utilizzo vastissimo in 
workstation, sistemi CAD/CAM, sistemi di 
commutazione telematici, robot e controllori di 
processo, oltre che nei microcomputer di re¬ 
cente realizzazione, come Macintosh, Sinclair 
QL, HP 9816. Questo manuale è una preziosa 
fonte di informazione per gli appassionati che 
vogliono cimentarsi con la programmazione in 
Assembler. 168 pagine, 16.000 lire. 


Come usare MacWrite e MacPaint. Molto più 
di quanto facciano i manuali operativi allegati ai 
programmi, questo volume svela ogni trucco 
dei due applicativi per Macintosh, spiegando ed 
esemplificando particolari tecniche di disegno e 
di gestione dei testi, sempre nell’ottica di un 
uso integrato dei due programmi. Il libro è 
riccamente illustrato con immagini prodotte se¬ 
guendo fedelmente i consigli del testo, cosi da 
offrire ai lettori il risultato grafico di ogni se¬ 
quenza di operazioni. 192 pagine, 20.000 lire 
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Gira, gira, gira, gira, gira, gira, 
gira, gira, gira, gira, gira... 

30 milioni di volte. 

E la risposta è sempre perfetta. 



Durata superiore - Verbatim è l’unico produttore in grado di offrirvi floppy disk 
con una durata media della vita di 30 milioni di giri. 10 volte di più di 
quanto previsto dalle norme in vigore. Ma questo è solo l’inizio. 


Affidabilità totale -1 floppy disk Verbatim offrono 
il massimo dell’affidabilità. Merito dell’avanzata ed 
esclusiva tecnologia, applicata sia nel trattamento 
della superficie sia nel procedimento di lubrificazione, 
che preserva e riduce l’usura delle testine. 

Qualità garantita - Ogni floppy disk Verbatim è 
sottoposto a 70 controlli di qualità di tipo chimico, 
meccanico ed elettronico, ed è garantito al 100% per 
l’assenza di errori. 

Provate oggi stesso i floppy disk Verbatim. 
Scoprirete la differenza qualitativa, ogni giorno, in 
ogni loro risposta. Sempre perfetta. 

I floppy disk Verbatim sono disponibili in una 
gamma completa da 8, 51 e 31 pollici. 
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Un’idea per l’anno nuovo? Per sapere che giorno era il venti 
dicembre dell’anno scorso, o quando cadrà il primo martedì 
di febbraio tra cinque anni c’è bisogno di una pila 
considerevole di calendari e agende nel cassetto. Fatene a 
meno: con questo pratico programma per l’Apple II e il 
Macintosh si può stampare un calendario per qualsiasi 
anno dal 1753 in poi. Si scelgono l’anno, il mese di partenza 
e il numero dei mesi da stampare e si sta a guardare la 
stampante che scodella il calendario. 


DOS 3.3 


ProDOS 
APPLE 7/e 
APPLE //c 



Nel duemila 

sarà lunedì? 



P uò accadere di scrivere in antici¬ 
po un documento, e di non voler¬ 
lo datare di domenica; oppure può 
succedere di voler organizzare molto 
tempo prima una vacanza, pianificare 
un viaggio di lavoro, prenotare un bi¬ 
glietto; e può capitare, al contrario, di 
voler mettere ordine in ricordi confusi 
per scoprire se quel bel Natale cadde 
veramente di giovedì o in quale data 
capitò quel sabato fatale. I calendari 
non servono allo scopo: sono grandi e 
scomodi, non si può tenerne cento; e 
non sarebbero comunque riferiti al fu¬ 
turo, ma solo al passato. 

Le agende portano stampato, tutt’al 
più, il calendario dell’anno prima e 
quello dell’anno dopo; ma non sem¬ 
pre. E comunque ci sono più di tre 
anni nella vita di un uomo, e sulla sua 
scrivania deve esistere il modo di inda¬ 
garli tutti. 

Calendario Perpetuo, questo il no¬ 
me del programma, si basa sulla legge 
della congruenza di Zeller. È una for¬ 
mula che serve per trovare il giorno 
della settimana per qualsiasi specifica 
data di qualsiasi specifico mese di 
qualsiasi specifico anno. In questo ca¬ 
so la formula viene impiegata per tro¬ 


vare il giorno della settimana del 1 
gennaio dell’anno specificato. Poi l’in¬ 
tero calendario viene immagazzinato 
in una matrice tridimensionale: per 
mese, per settimana e per giorno. Infi¬ 
ne questa matrice viene stampata, con 
qualche punto esclamativo e qualche 
lineetta qua e là. 

Come si usa 

Calendario Perpetuo (listato 1) è 
molto facile da usare. Per prima cosa 
preparate la stampante, in modo che 
l’alimentazione del modulo si arresti 
alle linee perforate sulla carta. Poi ese¬ 
guite il programma. Quando appare il 
prompt "ANNO: " inserite l’anno ini¬ 
ziale per il quale volete il calendario. Il 
prompt seguente chiede il mese inizia¬ 
le del calendario, specificato in forma¬ 
to numerico (in altre parole maggio 
sarebbe 5). 

Infine vi verrà chiesto di specificare 
il numero di mesi che volete stampare. 
Anche in questo caso potete introdur¬ 
re un numero da uno a dodici; dopo 
una decina di secondi, durante i quali 
il programma predispone alcune ma¬ 


trici, comparirà un prompt che dice di 
mettere in posizione la carta e di pre¬ 
mere un tasto. 

Premuto un tasto comincerà la 
stampa del calendario. Ci vorrà un po’ 
di tempo, e quindi se avete un buffer di 
stampante fatene uso. 

Un avvertimento: non inserite un 
calendario antecedente il 1753. Nel 
tardo sedicesimo secolo Papa Grego¬ 
rio XIII presentò un nuovo calenda¬ 
rio, che è noto come calendario grego¬ 
riano ed è in uso ancor oggi. L’Inghil¬ 
terra adottò il calendario nel 1752, ma 
il primo anno completo nel quale fu 
adoperato fu il 1753. Il vecchio calen¬ 
dario, noto come calendario giuliano, 
era molto impreciso e suscettibile di 
perdere il sincronismo con gli equino¬ 
zi. 

Come si introduce 

Digitate il programma in Applesoft 
visibile nel listato 1 e salvatelo su di¬ 
schetto con il comando: 


SAVE CALENDARIO PERPETUO 
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Listato per Apple II 

10 REM «m******************** 

20 REM * CALENDARIO PERPETUO * 

30 REM * DI NEIL SPINDEL * 

40 REM * COPYRIGHT <C) 1985 » 

50 REM » BY APPLICANDO 4 * 

60 REM * MICROSPARC, INC * 

70 REM MiiHIHHiHHKllH 

80 DIM M*(12): DIM DY$<7): DIM NM(12): DIM YX02.4.7) 

90 TEXT : HOME : VTAB 5: KTAB 13: PRINT ■CALENDARIO PERPETU 
0’: HTAB 14: PRINT 'DI NEIL SPINDEL': PRINT 
100 PRINT '* (0 1985 BY APPLICANDO 4 MICROSPARC *': PRINT 
110 VTAB 10: CALL - 958: INPUT 'ANNO: ':Yt:Y = 1NT ( VAL 
<Yt)> 

120 IF Y < 1753 THEN PRINT 'L'MNO DEVE SEGUIRE IL CAL. GR 
EGORIANO': FOR PAUSE = 1 TO 2000: NEXT : GOTO 110 
130 VTAB 12: CALL - 958: INPUT "MESE D'INIZIO (1-12): •;J« 
:J = 1NT ( VAL <J*)): IF J < 1 OR J > 12 THEN 130 
140 VTAB 14: CALL - 958: INPUT "QUfWTI MESI (1-12): ■ ;FJ<: 

FJ = INT ( VAL (FJ$>): IF FJ < 1 OR FJ > 12 THEN 140 
150 FJ = J + FJ: HOME 

160 PRINT 'CONTROLLA CHE L'AVANZAMENTO MODULO DELLA 1 :: PRIN 
T 'STAMPANTE SIA DISPOSTO PER L'ARRESTO': PRINT 'ALLE L 
1NEE PERFORATE.': PRINT 'PREMI UN TASTO PER STAMPARE' 
170 GET Z$: PRINT 

180 VTAB 22: HTAB 5: INVERSE : PRINT 'STO CALCOUWDO LE DAT 
E PER ' ;Y: NORMAL 

190 FOR 21 = 0 TO 12: FOR 22 = 0 TO 4: FOR 23 = 0 TO 7:YX(Z 
1.Z2.Z3) = 0: NEXT : NEXT : NEXT 
200 GOSUB 500: GOSUB 540: G050B 450 
210 VTAB 22: CALL - 958 
220 PRINT CHR* (4)'PR((1': PRINT CHR$ (9);'80N' 

230 IF J = FJ THEN PRINT CHR$ (4)'PR*0': TEXT : HOME : EN 
0 

240 IF J = 13 THEN Y = Y + 1:J = 1:FJ = FJ - 12: RESTORE : 

PRINT CHR» (4)'PRR0‘: GOTO 180 
250 Y$ = STR» (Y) 

240 TB = (80 - LEN <Y»)) / 2: GOSUB 1090: PRINT Y 
270 PRINT :TB = ((80 - LEN <M*(J))) / 2): GOSUB 1090: PRIN 
T M$(J) 

280 PRINT 
290 GOSUB 880 
300 PRINT 

310 GOSUB 1120: FOR T = 1 TO 7 
320 PRINT DY*(T); 

330 NEXT 

340 PRINT 

350 GOSUB 880 

360 PRINT 

370 FOR R = 1 TO 6 

380 GOSUB 1120: PRINT '!'; 


390 FOR F = 1 TO 7 

400 IF Y/KJ.R.F) = IfKJ) AND F = 7 THEN PRINT YX< J,R,F) : : 

GOSUB 1100: GOSUB 940: GOTO 960 
410 IF Y7.(J.R,F) = 0 THEN PRINT ' GOSUB 940: NEXT F: 
GOTO 940 

420 PRINT YX(J,R,F);: GOSUB 1100 

430 GOSUB 940 

440 NEXT F 

450 GOSUB 990 

460 NEXT R 

470 PRINT CHR» (12) 

480 J = J + 1: GOTO 230 

490 REM ««ROUTINES E SUBROUTINES*** 

500 REM ««ROUTINE AMO BISESTILE»** 

510 IF A8S (((1980 - Y) / 4) - INT (<1980 - Y) / 4)) > .0 
00001 THEN LY = 0: RETURN 

520 IF RIGHT» < STR» <Y),2) < > *00' THEN LY = 1: RETURN 
530 IF ABS (<Y / 400) - INT <Y / 400)) > .000001 THEN LY 
= 0: RETURN 
540 LY = 1 
550 RETURN 

560 REM ««LEGGE DELLA CONGRUENZA DI 2ELLER*** 

570 C = INT (Y / 100): IF RIGHT» ( STR* <Y) ,2) = '00' THE 
N C = C - 1 

580 D = (Y - (100 * «) - 1: IF D = - 1 THEN D = 99 
590 K = 1 
600 M = 11 

410 X = ( INT (2.6 *M-.2) + K+ D+ INT <D / 4) ♦ INT 
(C / 4) - (2 * C)> / 7 
420 G = ABS (X - INT (X)) 

630 F = INT <7 * G + .00001) ♦ 1 
440 RETURN 

650 REM ««PREDISPONE MATRICI*** 

660 FOR X = 1 TO 12: IF X = 2 THEN NEXT 
470 READ FW(X) 

680 NEXT 

490 IF LY THEN W<2) = 29: GOTO 710 
700 ltl<2) = 28 
710 FOR X = 1 TO 12 
720 READ M»(X) 

730 NEXT 

740 FOR X = 1 TO 7 
750 READ DY4(X) 

740 NEXT 

770 FOR X = 1 TO 12 
780 R = 1 

790 FOR G = 1 TO M1(X) 

800 LET YX(X,R,F) = G 
810 F = F + 1 

820 IF F = 8 THEN F = 1:R = R + 1 
830 NEXT : NEXT 
840 RETURN 

850 DATA 31.31 ,30,31 ,30.31,31.30.31 ,30,31 
840 DATA GENNAIO,FEBBRAIO,MARZO.APRILE.MAGGIO.GIUGNO,LUGLI 
0 .AGOSTO, SETTEMBRE,OTTÓBRE .NWEMBRE, DI CENERE 
870 DATA '! DOM !*,' LUN !',' MR !',' MER 

GIO VEN !',' SAB !' 

980 REM ««RIGHE DI LINEETTE*** 

890 GOSUB 1120: FOR N = 1 TO 71 

900 PRINT 
910 NEXT 
920 RETURN 

930 REM SUBROUT1NE PER STAMPARE I '!' 

940 FOR L = 1 TO 7: PRINT ' ';: NEXT : PRINT '!':: IF F = 7 
THEN PRINT 
950 RETURN 

960 REM ««SUBROUTINE PER FINE SETTIMANA*** 

970 GOSUB 990 

980 GOTO 470 

990 REM ««SUBROUTINE PER STAMPARE RIGHE DI ! E -*** 

1000 FOR X = 1 TO 6 

1010 GOSUB 1120: FOR T = 0 TO 6 

1020 PRINT" ':: REM 9 SPAZI 

1030 NEXT T 

1040 PRINT '!' 

1050 NEXT X 
1040 GOSUB 880 
1070 PRINT 
1080 RETURN 

1090 FOR L = 1 TO TB: PRINT ' ':: NEXT : RETURN 
1100 IF YX(J,R,F) < 10 THEN PRINT ■ ';: RETURN 
1110 RETURN 

1120 PRINT' 'j: RETURN : REM 4 SPAZI 
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Una versione del Calendario Perpe¬ 
tuo per il Macintosh è visibile nel lista¬ 
to 2. È stata scritta in Microsoft Basic 
per l’impiego con la stampante Ima- 
gewriter. 

Come funziona 

La chiave del Calendario Perpetuo 
è la legge della congruenza di Zeller. 
In sua mancanza occorrerebbe sapere 
in quale giorno della settimana cade il 
1 gennaio. Nella formula di Zeller M è 
il numero del mese, con gennaio e feb¬ 
braio espressi come mesi 11 e 12 del¬ 
l’anno precedente. Quindi marzo è 1, 
aprile è 2 e così via fino a dicembre, 
che è 10. K è il giorno del mese; C è il 
secolo; D è l’anno del secolo; e F è il 
giorno della settimana. Se F=0, il 
giorno è domenica. Se F= 1 il giorno è 
lunedì, e così via. 

La formulazione della legge della 
congruenza di Zeller è: 


F = {[2.6 M - 0.2] + K + 
D + [D/4] - 2 C} MOD 7 


Le parentesi quadre corrispondono 
alla funzione INT, e mod 7 significa 
che F è uguale al resto della quantità 
fra graffe diviso per 7. 

Calendario Perpetuo usa queste im¬ 
portanti variabili: F è il giorno della 
settimana; R è la settimana del mese; J 
è il mese dell’anno; e Y è l’anno. 

Il programma usa queste matrici: 
DY$ (dimensionata a 7) è una matrice 
stringa con i nomi dei giorni della setti¬ 
mana; Y$ (dimensionata a 12) è una 
matrice stringa con i nomi dei mesi; 
NM (dimensionata a 12) è il numero 
dei giorni in ciascun mese; e Y% (di¬ 
mensionata a 12,6,7) è la vera e pro¬ 
pria matrice del calendario. Altre va¬ 
riabili vengono utilizzate ai fini della 
lettura dei dati, della stampa di righe 
di lineette e punti esclamativi e via 
dicendo. 

Non dimenticate gli anni bisestili. 
Ecco come Calendario Perpetuo con¬ 
trolla se un anno è bisestile. NM 
(2)=28 con queste eccezioni (per le 
quali NM (2)=29): 


1. L’anno specificato non è un anno 
secolare ed è divisibile per quattro. 

2. L’anno specificato è un anno secola¬ 
re ed è divisibile per 400. 

Se un anno secolare non è divisibile 
per 400, infatti, non è bisestile. Per 
esempio il 1800 e il 1900 non sono stati 
anni bisestili, mentre lo sarà il 2000. 
In concreto la stampa del calendario 


è relativamente semplice. Calendario 
Perpetuo utilizza una subroutine per 
stampare gli spazi e così posizionare i 
numeri e i punti esclamativi sulla car¬ 
ta, e un semplice loop FOR—NEXT 
per stampare le righe di lineette. 

Riga per riga 

La linea 80 dimensiona le quattro 
matrici: M$, DY$, NM e Y%. Dopo 
che è stata eseguita la linea 110 ed è 
stato specificato l’anno, la linea 120 
verifica che l’anno sia 1753 o maggio¬ 
re. Le linee 130-140 chiedono il mese 
d’inizio e il numero dei mesi da stam¬ 
pare. La linea 200 fa una diramazione 
alle prime tre subroutine. 

La subroutine 1 controlla se si tratti 
di un anno bisestile. La subroutine 2 è 
la legge dela congruenza di Zeller. La 
linea 570 trova il secolo dell’anno spe¬ 
cificato. La linea 580 trova l’anno del 
secolo. L’uno viene sottratto perché 
gennaio è preso come mese 11 dell’an¬ 
no precedente. La K a linea 590 sta per 
il giorno del mese (1 gennaio). La M a 
linea 600 sta per il numero del mese. 

La linea 610 è l’effettiva formula 
della legge della congruenza di Zeller. 
La linee 620 e 630 trovano il resto dalla 
linea 610 e gli aggiungono uno (ai fini 
della spaziatura in un momento suc¬ 
cessivo). 

La subroutine 3 predispone le quat¬ 
tro matrici menzionate in precedenza. 
Le linee 660—700 predispongono la 
matrice NM; le linee 710—730 la ma¬ 
trice M$; le linee 740—760 la matrice 
DY$; e le linee 770—830 predispongo¬ 
no la matrice Y%. 

Dopo aver completato queste tre 
subroutine verrete invitati a mettere in 
posizione la carta e a premere un ta¬ 
sto. La linea 220 accende la stampante 
e la imposta su 80 colonne. Può ren¬ 
dersi necessario cambiare la larghezza 
di colonne o il numero di slot per l’a¬ 
dattamento alla propria stampante. 

Il resto del programma principale, 
linee 230—480, effettua la stampa vera 
e propria del calendario. Le linee 
260—270 centrano e stampano su ogni 
pagina l’anno e il mese. La linea 290 fa 
una diramazione alla subroutine che 
disegna una riga di lineette attraverso 
la pagina. Le linee 310-330 stampano 
i giorni della settimana in cima a ogni 
mese. 

Dopo aver stampato un’altra riga di 
lineette il programma percorre le su¬ 
broutine che stampano il calendario 
vero e proprio. Viene avviato un loop 
e viene stampata la matrice Y% per il 
primo mese. 
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Macintosh * 
Microsoft * 
BASIC 


1Q ******************************************* 

20 REM * CALENDARIO PERPETUO 
30 REM * DI NEIL SPINDEL 
40 REM * COPYRIGHT (C) 1985 
50 REM * BY APPLICANDO & 

60 REM * MICROSPARC, INC 

yQ ******************************************* 

80 DIM M$(12): DIM DY$(7): DIM NM(12): DIMY%(12,6,7) 

90 CLS: CALL MOVETO(200,20): PRINT "Calendario 
Perpetuo": CALL MOVETO(200,35): PRINT "di Neil 
Spindel": PRINT 

100 CALL MOVETOf 130,50): PRINT "** (01985 by 
Applicando & Micro SPARC, Ine, **": PRINT 
110 INPUT "ANNO: ";Y$:Y = INT(VAL(Y$)) 

120 IF Y < 1753 THEN PRINT TANNO DEVE SEGUIRE IL 
CALENDARIO GREGORIANO": FOR PAUSE = 1 TO 
2000: NEXT : CLS: GOTO 90 

130 INPUT "MESE D'INIZIO (1-12): ";J$:J= INT(VAL(J$)) 
140 INPUT "QUANTI MESI (1-12): ";FJ$:FJ = INT ( VAL 
(FJ$)):FJ = J + FJ 
150 CLS 

160 PRINT "CONTROLLA CHE L'AVANZAMENTO MODULO 
DELLA": PRINT "STAMPANTE SIA DISPOSTO PER 
L'ARRESTO'': PRINT "ALLE LINEE PERFORATE.'': 
PRINT "PREMI UN TASTO PER STAMPARE" 

170 Z$=INKEY$:IFZ$=''" THEN 170 
180 CALL MOVETO(140,90): PRINT "STO CALCOLANDO LE 
DATE PER";Y 

190 FOR ZI = 0 TO 12: FOR Z2 = 0 TO 6: FOR Z3 = 0 TO 
7:Y%(Z1,Z2,Z3) = 0: NEXT : NEXT : NEXT 
200 GOSUB 500: GOSUB 560: GOSUB 650 
210 CALL MOVETOd40,90): FOR Z1= 1 TO 60: PRINT " ";: 

NEXT:PRINT: LPRINT CHR$(27);"N" 

220 REM INIZIO LOOP 
230 IF J = FJ THEN CLS: END 

240 IF J = 13 THEN Y = Y + 1 :J = 1 : FJ=FJ-12: RESTORE : 

GOTO 180 
250 Y$= STR$ (Y) 

260 TB = (70 - LEN (Y$)) / 2: GOSUB 1090: LPRINT Y 


270 LPRINT :TB = ((70- LEN (M$(J)))/2): GOSUB 1090: 

LPRINT M$(J) 

280 LPRINT 
290 GOSUB 880 
300 LPRINT 

310 GOSUB 1120: FORT= 1 TO7 
320 LPRINT DY$(T); 

330 NEXT 

340 LPRINT 

350 GOSUB 880 

360 LPRINT 

370 FOR R = 1 TO6 

380 GOSUB 1120: LPRINT "!"; 

390 FOR F = 1 TO 7 

395 Y$=STR$(Y%(J,R,F)): IF LEFT$(Y$,1)=" " THEN 
Y$=MID$(Y$,2) 

400 IF Y%(J,R,F) = NM(J) AND F = 7 THEN LPRINT Y$;: 

GOSUB 1100: GOSUB 940: GOTO 960 
410 IF Y%(J,R,F) = 0THEN LPRINT" GOSUB940:FLAG 
= 1: GOTO 440 

420 LPRINT Y$;: GOSUB 1100: GOSUB 940: FLAG=0 
440 NEXTF 

445 IF FLAG=1 THEN FLAG=0: GOTO 960 

450 GOSUB 990 

460 NEXTR 

470 LPRINT CHR$ (12) 

480 J = J + 1 : GOTO 230 

490 REM ""ROUTINE E SUBROUTINE*** 

500 REM """ROUTINE ANNO BISESTILE*** 

510 IF ABS (((1980 - Y) / 4) - INT ((1980 - Y) / 4)) > .000001 
THEN LY = 0: RETURN 

520 IF RIGHT$ ( STR$ (Y),2) < > "00" THEN LY = 1 : RETURN 
530 IF ABS ((Y / 400) - INT (Y/400)) > .000001 THEN LY = 
0: RETURN 
540 LY = 1 
550 RETURN 

560 REM """LEGGE DELLA CONGRUENZA DI ZELLER*** 
570 C = INT (Y/100): IF RIGHT$ ( STR$ (Y),2) = "00" THEN 
LET C = C -1 

580 D = (Y-(100" C))-1: IF D = -1 THEN D = 99 
590 K = 1 
600 M = 11 

610 X = ( INT (2.6 *M-.2) + K + D+ INT(D/4)+ INT(C/4)- 
(2 * C)) / 7 

620 G= ABS (X - INT (X)) 

630 F = INT(7* G + .00001)+ 1 
640 RETURN 

650 REM """PREDISPONE MATRICI*** 

660 FOR X = 1 TO 12: IF X = 2 THEN 680 
670 READ NM(X) 


Ci sono tre diverse condizioni alle 
quali viene stampata una data. La pri¬ 
ma condizione è un giorno normale, 
come martedì, 3 gennaio. Per questo 
tipo di giorno viene stampato un punto 
esclamativo seguito dal numero. Do¬ 
po il completamento di una riga (una 
settimana) viene stampato alla fine 
della riga un punto esclamativo. Poi 
vengono stampate sei righe di punti 
esclamativi (a intervalli di dieci spazi), 
seguite da una riga di lineette. Il loop 
continua fino alla fine del mese, o fino 
a quando viene incontrata una delle 
altre condizioni. 

La seconda condizione si ha quando 
la posizione del giorno nella matrice 


conserva uno zero. Per esempio, se il 
primo giorno del mese è un martedì la 
domenica e il lunedì che lo precedono 
sarebbero uno zero nella matrice. 
Quando si incontra uno zero viene 
stampato un unico punto esclamativo. 

La terza condizione si verifica quan¬ 
do l’ultimo giorno del mese è un saba¬ 
to. Se questa condizione non fosse in¬ 
clusa nel programma verrebbe stam¬ 
pata alla fine del mese una riga vuota 
di riquadri. Se l’ultimo giorno del me¬ 
se è un sabato vengono stampati i pun¬ 
ti esclamativi per l’ultima settimana 
del mese e il programma avanza al 
mese successivo. 

Dopo il completamento di un intero 


mese viene emesso un avanzamento 
del modulo (CHR$ (12)), e comincia 
la stampa del mese seguente. 

Miglioramenti 

suggeriti 

C’è un miglioramento del program¬ 
ma, probabilmente davvero utile: rag¬ 
giunta delle feste al calendario. Potete 
farlo provando ogni giorno dell’anno 
per vedere se sia una festa. Per esem¬ 
pio: 

IF J = 12 AND Y % (J,R,F) = 25 
THEN A$="NATALE" 
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680 NEXT 

690 IF LY THEN NM(2) = 29: GOTO 710 

700 NM(2) = 28 

710 FOR X = 1 T012 

720 READ M$(X) 

730 NEXT 

740 FOR X = 1 TO 7 

750 READ DY$(X) 

760 NEXT 

770 FOR X = 1 T012 
780 R = 1 

790 FOR G = 1 TO NM(X) 

800 LET Y%(X,R,F) = G 
810 F = F+ 1 

820 IF F = 8 THEN F = 1 :R = R + 1 
830 NEXT : NEXT 
840 RETURN 

850 DATA 31,31,30,31,30,31,31,30,31,30,31 
860 DATA GENNAIO, FEBBRAIO, MARZO, APRILE, 

MAGGIO, GIUGNO, LUGLIO, AGOSTO, SETTEMBRE, 
OTTOBRE, NOVEMBRE, DICEMBRE 
870 DATA "I DOM !"," LUN !"," MAR !"," MER !",” GIO 
!"," VEN !"," SAB !" 

880 REM ""RIGHE DI LINEETTE*** 

890 GOSUB 1120: FOR N = 1 T0 71 
900 LPRINT 
910 NEXT 
920 RETURN 

930 REM SUBROUTINE PER STAMPARE ! 

940 FOR L = 1 TO 7: LPRINT * NEXT : LPRINT *!";: IF F=7 
THEN LPRINT 
950 RETURN 

960 REM ‘“SUBROUTINE PER FINE SETTIMANA*** 

970 GOSUB 990 
980 GOTO 470 

990 REM “'SUBROUTINE PER STAMPARE RIGHE DI ! E - 
*** 

1000 FOR X = 1 TO 6 
1010 GOSUB 1120: FOR T = 0TO 6 
1020 LPRINT"! ";:REM9SPAZI 
1030 NEXTT 
1040 LPRINT"!" 

1050 NEXTX 
1060 GOSUB 880 
1070 LPRINT 
1080 RETURN 

1090 FOR L = 1 TO TB: LPRINT " ";: NEXT : RETURN 
1100 IF Y%(J,R,F) < 10 THEN LPRINT RETURN 
1110 RETURN 

1120 LPRINT" ";: RETURN: REM7spazi 


In altre parole, se il loop è nel mese 
12 (dicembre), e si tratta del giorno 25, 
la stringa relativa a quella festa direb¬ 
be: Natale. Sarebbe necessario inseri¬ 
re un test del genere per ogni festa 
voluta nel calendario. 

Si può incappare in difficoltà con le 
feste che cadono in un certo giorno, 
anziché a una data specifica. Per esem¬ 
pio il giorno di Pasqua viene celebrato 
in data variabile da anno ad anno. 


Il programma per Apple II è disponi¬ 
bile su dischetto. L'elenco, I prezzi 
e le modalità d'ordine di questo e 
degli altri dischetti disponibili sono 
riportati nella rubrica Disk Service 
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ThundarScan 


Il sistema grafico per il vostro mAC ! Facilissimo da 
usare vi permette di trasformare qualunque immagine 
in un documento ad alta risoluzione macintosh Se 
avete, anche solo in parte, acquistato il mAC per le sue 
capacita' grafiche, non potete fare a meno di 
ThunderScan Fotografie, disegni, mappe, piante 
topografiche, marchi, da originali a colori o in bianco e 
nero, possono essere riprodotti con la precisione di 200 
punti per pollice e con 32 tonalità' di grigio Andy 
Hertfeld, uno dei realizzatori del software di 
macintosh, ha reso questo strumento estremamente 
semplice e versatile nell'uso 
Si inserisce al posto della 
cartuccia del nastro nella 
vostra ImageWriter ed e' 
subito pronto a leggere 
qualunque immagine che 
potrete ingrandire sino a 16 
volte o rimpicciolire a 1/16 

FAI mAC 512K 

Avete un mAC a I28K e volete portarlo a 512K ? 



Telefonateci, vi diremo come in pochi giorni e con poca 
spesa potrete finalmente usare tutto quel fantastico 
software che gira solo sul 512K Tel 0481 /30909 


Solo per A p ple He 

I^qpiESSSldSfavs S41IE -o ®® lasilteiMaia al nuovo prezzo di 
Lire 140.000 

HS®K * m BPBamra Lire 298 000 

UltaaBWB Bsfisffltìsi S®® compatibile con il mouse Apple a 
Lire 148 000 

«SsgJBfcftglk per Apple Ile ed Apple Ile Lire 52 000 
Per A p ple He 

a Lire 480 000 

Per tutti ali A pple 

- E - un telefono amplificato ed un 
modem CCITT V.21 a 300 baud Auto/manual Answer, 
manual Originate, Auto Disconnect Da connettersi in 
RS-232 C con il vostro computer L 320 000 
©flaeiM ISBteCSaiwrej @°SFDD custodia plastica L 48 000 
IBWe cM EEtenrairsK S° Lire 100 000 


Vendila per Corrispondenza Tutti i prezzi indicati 
comprendono PIVA nessuna spesa di spedizione per ordini 
superiori alle 50 000 Lire. Prezzi soggetti a variazioni. 

ELCOm C so Italia 149 34170 GORIZIA Tel 0481/30909 
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applicando 


vi mettono al sicuro 


Condizioni generali di assicurazione. 


1) Premessa 

a) l'adesione alla presente polizza è riservata ai proprie¬ 
tari di un Personal Computer il cui valore stabilito 
come alla Condizione 6) sia superiore a L. 2.500.000 
IVA compresa; 

b) l'adesione alla presente polizza da parte dei proprie¬ 
tari di personal Computer avverrà a mezzo invio di 
apposita cartolina con il relativo importo di premio; 

c) l’intestatario della cartolina sarà considerato a tutti gli 
effetti come l'Assicurato; 

d) la garanzia sarà operante dalle ore 24 del giorno di 
spedizione della cartolina, risultante dal timbro posta¬ 
le. La copertura avrà durata un anno, sempreché la 
data di inizio della garanzia sia compresa nel periodo 
di validità della convenzione; 

GARANZIE PRESTATE E CONDIZIONI DI 
ASSICURAZIONE 

2) Sez. I - Danni materiali 

Derivanti da; 

a) incendio, opera di spegnimento e salvataggio, fulmi¬ 
ne. esplosione, scoppio, implosione; 

b) acqua e liquidi in genere, inondazione, alluvione, 
trombe, uragani, gelo, ghiaccio, neve, grandine, va¬ 
langa. caduta di massi e altri simili eventi; 

c) superamento del muro del suono, caduta di aeromo¬ 
bili o cose da essi trasportate; 

d) corto circuito, variazione di corrente, sovratensione 
arco voltaico, deficienze di isolamento, effetti di elet¬ 
tricità statica, induzione; 

e) imperizia, negligenza, errata manovra, nonché azioni 
dolose e colpose in genere; 

f) trasporti e smontaggi connessi con lavori di pulizia o 
di manutenzione; 

g) furto e rapina; 

h) terremoto, maremoto od eruzioni vulcaniche; 

i) persone che prendono parte a tumulti popolari, scio¬ 
peri , sommosse e che perpetrino indivudualmente od 
in associazione atti di terrorismo o sabotaggio verifi¬ 
catisi in occasioni di serrate. 

3) Sez. Il - Responsabilità Civile Terzi 

L'assicurazione si intende inoltre prestata per la Respon¬ 
sabilità Civile derivante all'Assicurato dalla proprietà e 

dall'uso personale del Computer assicurato identificato 

nel certificato di assicurazione. 

I massimali di garanzia si intendono fissati in; 


L. 100.000.000 per sinistro con il limite di 

L. 100.000.000 per ciascuna persona deceduta o che 
abbia subito lesioni personali 

L. 100.000.000 per danni a cose e/o animali. 

4) Esclusioni 

La Società non è obbligata per i danni dovuti a; 

- dolo dell'Assicurato; 

- corrosione, deperimento, logoramento che siano con¬ 
seguenza del normale uso o funzionamento o causati 
dagli effetti graduali degli agenti atmosferici; 

- per i quali deve rispondere il fornitore, venditore o loca¬ 
tore degli enti assicurati per legge o per contratto, o per 
inadeguata manutenzione; 

- causati da difetti di materiale o di costruzione che esi¬ 
stevano già all'atto della stipulazione della polizza ed 
erano a conoscenza dell’Assicurato; 

- causati direttamente od indirettamente da avvenimenti 
bellici, sommosse militari, invasioni, adozionedi misure 
da parte di potenze straniere, rivoluzione, ribellione, 
insurrezione, assunzione od usurpazione di potere di 
carattere militare, sequestri; 

- verificatisi in occasione di esplosione, radiazione nu¬ 
cleare o di contaminazione radioattiva, 

- uso improprio del bene (mancato rispetto delle norme 
di impiego dettate dal costruttore); 

- danni estetici (quelli interessanti l'involucro esterno che 
non sia conseguenza di un danno risarcibile a termine 
della presente polizza); 

- guasti casualmente riconducibili ad interventi, a ripara¬ 
zioni e/o modifiche effettuate da un centro non autoriz¬ 
zato dalla casa costruttrice della macchina; 

- danni indiretti in genere. 

5) Operatività della garanzia 

a) La garanzia è operante solamente se gli enti assicurati 
sono ubicati presso il domicilio dell'Assicurato od in 
luoghi diversi da questi se in possesso dell'Assi¬ 
curato. 

b) La garanzia è pure efficace se i beni si trovano sull’au¬ 
tovettura in uso all'Assicurato, salvo i seguenti casi: 

- qualora l’autovettura venga lasciata incustodita dal¬ 
le ore 22 alle ore 6; 

- qualora l'autovettura regolarmente chiusa a chiave 
venga lasciata incustodia dalle ore6 alle ore 22 e gli 
enti assicurati non opportunamente occultati nel 
bagagliaio. 


c) Limitatamente ai danni di rottura la garanzia è effica¬ 
ce solamente nel caso questi siano dovuti ad un inci¬ 
dente in cui rimanga coinvolto anche il veicolo in uso 
dell’Assicurato che trasportava i beni assicurati. 

d) Per gli enti per i quali non è stato stipulato il contratto 
di manutenzione e/o assistenza con la casa costrut¬ 
trice e/o ditte di essa mandatarie qualora l'ente ri¬ 
chieda per norma del fornitore detto contratto, la 
Società non risponde dei danni verificatisi in conse¬ 
guenza di guasto meccanico e/o elettrico salvo che 
l'Assicurato provi che tale guasto sia causato da even¬ 
to esterno agli enti assicurati o da incendio originato 
da uno di questi enti. 

6) Somma Assicurata 

La somma assicurata per ciascun ente deve corrispondere 
al costo di rimpiazzo, ossia al prezzo di listino della casa 
costruttrice ed escluso ogni sconto o prezzo di favore di 
un ente nuovo, eguale od equivalente per caratteristiche, 
prestazioni e rendimento economico. 


7) Premio 

Per ogni singola applicazione è stabilito un premio forfet¬ 
tario omnicomprensivo cosi calcolato: 


Somma assicurata 

Premio 

da 

2.500.000 a 3.000.000 

L. 

50.000 

da 

3.000.000 a 5.000.000 

L. 

65.000 

da 

5.000.000 a 7.000.000 

L. 

80.000 

da 

7 000.000 a 10 000.000 

L. 

100.000 

da 10.000.000 a 15.000 000 

L. 

120 000 

da 15.000.000 a 20.000.000 

L. 

150.000 


8) Franchigia 

per ogni e qualsiasi danno che colpisca gli enti assicurati è 
stabilita una franchigia di: 

L. 50.000 per somma assicurata fino a L. 5.000.000 
L. 100.000 per somma assicurata superiore a 
L. 5.000.000 

Per sinistri causati da eventi come ai punti g) ed h) delle 
garanzie prestate, la Società liquiderà i danni sotto dedu¬ 
zione di uno scoperto pari al 20% della somma assicurata, 
col minimo delle franchigie sopra stabilite. 

9) Rinvio alle norme di legge 

Per tutto quanto non è qui diversamente regolato, valgono 
le norme di legge. 




Si! Desidero assicurare i miei/il mio computer. Inviatemi a stretto giro di posta il certificato emesso dalla Ras. 
L'assicurazione avrà valore a decorrere dalle ore 24 del giorno di spedizione della mia adesione. Per la data fa fede il 
timbro postale. 


COGNOME. 

NOME . 

IN0IRIZZ0. 

CAP CITTA' 


. PROVINCIA. 

. N. 

Assicuro l/il seguente personal: 
Marca e Modello 

N. di matricola 

Valore (IVA compresa) 



Con le seguenti periferiche (stampanti, video, drive, hard disk, ecc) 

Marca e Modello N. di matricola Valore (IVA compresa) 


Nel caso non abbiate sufficiente spazio ricopiate su un foglio il testo completo di questo tagliando Indicando tutti i prodotti che intendete assicurare. 

Per un totale complessivo di Lire.. su cui pago il premio calcolato In base alla tabella riportata qui sopra (su fondoverde). 

Allego assegno non trasferibile di Lire.intestato a Editronica srl, corso Monforte 39,20i22Milano. 
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N o^> Sfruttando le routine messe a punto nei precedenti articoli della dos 3.3 
<0/ serie, è possibile questa volta mettere a punto una utility grafica APPLE //e 
che consente di creare figure a blocco 0 immagini complete in Wi 
doppia Hi - Res, in bianco e nero 0 a colori, direttamente sullo 
schermo della doppia alta risoluzione, e di salvarle su dischetto 
per l'impiego 0 l’editing in un momento successivo. 


Ed è subito schermo 


S arebbe ora di esaminare qualche 
routine di animazione a sposta¬ 
mento in doppia Hi —Res, per ottene¬ 
re la possibilità di un movimento oriz¬ 
zontale veramente scorrevole per ogni 
figura, ma bisogna invece pazientare 
per un altro mese: c’è ancora qualcosa 
da imparare sulla creazione di base dei 
programmi. 

Dato che disegnare sugli schermi 
della doppia Hi-Res può essere diffi¬ 
cile, infatti, dovreste trovare questo 
programma molto utile nella creazio¬ 
ne di figure a blocco e di immagini. Il 
programma è veramente efficiente 
nella manipolazione della doppia Hi 
-Res e delle routine del DHR.DRI¬ 
VER, e quindi se comprendete come 
funzionano le varie parti del program¬ 
ma non dovreste avere problemi nella 
creazione di vostri programmi perso¬ 
nali. 

Programma Tavolozza 

Per utilizzare il programma Tavo¬ 
lozza , in doppia alta risoluzione, dove¬ 
te prima introdurre il listato 1 e salvar¬ 
lo su un dischetto che contenga il pro¬ 
gramma DHR.DRIVER presentato 
nel n. 19 di Applicando (pag. 88). 

Per chi non avesse a disposizione 
l’arretrato, comunque, il programma 
DHR.DRIVER viene nuovamente 
pubblicato nel listato 2. Per salvarlo su 
dischetto usate il comando: 


BSAVE DHR.DRIVER, 
A$9283.L$37D 


Può convenirvi escludere l’istruzio¬ 
ne ONERR GOTO 980 dalla linea 880 
fino a quando avete fatto il debugging 
del vostro programma: si impedisce 
così che l’ONERR intrappoli gii even¬ 
tuali errori di battitura fatti introdu¬ 
cendo il listato. 

La prima volta che farete girare il 


programma verrete invitati a dire se 
preferite lavorare con uno schermo 
vuoto, scegliendo "B" (per Blank), o 
con un’immagine esistente ("E"). Se 
volete creare una tavola di figure a 
blocco o una nuova immagine a dop¬ 
pia Hi-Res dovete scegliere "B". Se 
volete prendere a prestito parti di una 
immagine esistente per utilizzarle co¬ 
me figure a blocco, o se volete conti¬ 
nuare a lavorare a un’immagine già 
iniziata, dovete scegliere "E". 

Sarete poi invitati a dire se l’imma¬ 
gine è già in memoria (magari caricata 
o creata da un programma diverso). Se 
rispondete di sì ("Y"), il programma 
impiegherà qualsiasi grafica si trovi già 
in memoria. Se scegliete invece "N" 
apparirà un catalogo del dischetto e vi 
verrà chiesto il nome dell’immagine da 
caricare. 

Tutte le immagini in doppia Hi— 
Res saranno immagazzinate in due file 
del dischetto, in ciascuno dei quali al 
nome del dischetto è aggiunto "—PA- 
GE1" o "—PAGE1X". Inserite soltan¬ 
to il nome; provvederà il programma 
Tavolozza ad aggiungere al nome "— 
PAGE1" o PAGE1X". 

Verrà poi presentato lo schermo a 



Con l’aiuto delle routine di questo pro¬ 
gramma è possibile ottenere veloce¬ 
mente immagini in doppia alta risolu¬ 
zione come questa. 


doppia Hi—Res, o vuoto o con la vi¬ 
sualizzazione dell’immagine, come 
pure una finestra di testo che contiene 
parecchie informazioni utili per la 
creazione di figure o di immagini. Sie¬ 
te probabilmente al corrente del fatto 
che ci sono nella memoria della doppia 
Hi-Res 16.384 byte e 107.520 singoli 
punti di schermo. Le informazioni che 
appaiono in basso sullo schermo si ap¬ 
plicano al singolo punto (bit) della cor¬ 
rente posizione sullo schermo. Ecco 
una lista delle informazioni che vengo¬ 
no fornite: 

COLONNA = (0-79) È la posizione 
in cui ci si trova al momento sullo 
schermo. 

PAGINA = (1 o IX) Indica se la posi¬ 
zione corrente è nella memoria princi¬ 
pale o in quella ausiliaria. 

HPLOT ’X’ = (0-279) Mostra il cor¬ 
rente valore di HPLOT in Applesoft 
per questo punto. 

X = (0—559) Indica la corrente coor¬ 
dinata X in doppia Hi—Res. 

Y = (0—191) Indica il valore della cor¬ 
rente coordinata Y. 

INDIRIZZO = È l’indirizzo del byte 
in cui si è al momento. 

VALORE BYTE = Indica il valore 
decimale immagazzinato nel byte. 
BITS = Mostra lo schema o configura¬ 
zione dei bit internamente a questo 
byte (in ordine contrario rispetto al¬ 
l’ordine normale). Il bit in cui siete al 
momento sarà mostrato in inverse. 
HL-HR = (0—39) Rivela il corrente 
offset d’indirizzo del presente byte ed 
è utilizzato per determinare HR e HL 
nella creazione della figura a blocco. 
BLOCCO COLORE = (0-139) Indi¬ 
ca in quale dei 140 blocchi di colore vi 
trovate, e può essere utilizzato per de¬ 
terminare quando vi dovete spostare 
da un blocco di colore al successivo. 
N.BIT = (1—4) Indica su quale dei 
quattro bit all’interno del corrente 
blocco di colore siete attualmente. Im- 
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postando ognuno dei quattro bit in 
conformità con la carta delle configu¬ 
razioni dei colori pubblicata in figura 2 
nel n. 19 di Applicando (pag. 95), po¬ 
trete facilmente impostare i singoli 
blocchi di colore sul colore voluto. 
MODO = PLOT/NOPLOT/VISITA 
Indica il presente modo di disegno del 
programma. 

VELOCITÀ = VELOCE/LENTA 
Indica se vi state spostando di quattro 
punti o di un punto per ogni mossa. 

Avendo sotto mano queste informa¬ 
zioni, dovreste essere in grado di con¬ 
trollare facilmente tutti gli aspetti del¬ 
la creazione grafica sullo schermo del¬ 
la doppia Hi—Res. 

Scelta dei comandi 

Per spostarsi sullo schermo si devo¬ 
no utilizzare le quattro frecce del Ile. 
Noterete che nella linea 320 il pro¬ 
gramma interpreta CHR$ (32) come 
freccia destra. Controllando sul ma¬ 
nuale troverete che la freccia destra è 
CHR$ (21) e non CHR$ (32). Nella 
doppia Hi —Res CHR$ (21) 
(<CTRL>U) disattiva la scheda a 80 
colonne e la doppia Hi-Res. Per con¬ 
sentire l’uso della freccia destra questa 
viene apparentemente interpretata 
come CHR$ (32) mentre si è in doppia 
Hi-Res. 

Il tasto P imposta il MODO PLOT, 
nel quale il cursore al suo passaggio 
cambia ogni bit nel valore 1. 

Il tasto N imposta il MODO NO- 
PLOT, nel quale il cursore cambia 
ogni bit che incontra nel valore 0. 

Il tasto V imposta il MODO VISI¬ 
TA (forse il nome è un tantino forza¬ 
to) e permette di spostarsi sullo scher¬ 
mo senza influire su alcuno dei bit sui 
quali si passa. 

Il tasto G imposta lo schermo sulla 
GRAFICA A TUTTO SCHERMO 
ed elimina la finestra di testo con tutte 
le sue utili informazioni. Constaterete 
forse che il modo G è molto utile quan¬ 
do si disegna nelle porzioni più basse 
dello schermo grafico. 

Il tasto T ripristina la FINESTRA 
DI TESTO in modo che si possano 
vedere le informazioni di schermo. 

Il tasto S imposta il MODO LEN¬ 
TO in modo che il marcatore si sposti 
di un punto a ogni pressione di tasto. 

Il tasto F imposta il MODO VELO¬ 
CE, per lo spostamento di quattro 
punti a ogni mossa. Questo modo è 
utile per portarsi rapidamente in parti 
diverse dello schermo. Vi aiuterà an¬ 
che a riempire le zone con le stesse 
configurazioni di bit dei blocchi di co¬ 


lore (quando vi spostate in orizzonta¬ 
le), dato che rimarrete sempre sullo 
stesso bit spostandovi da un blocco di 
colore a quello seguente. 

Battendo <CTRL>S uscite dalla 
sezione disegno del programma e po¬ 
tete salvare sul disco il lavoro fatto. 

Quando introdurrete la sezione sal¬ 
vataggio del programma vi verrà chie¬ 
sto se volete salvare il lavoro fatto. Se 
rispondete "S" verrete invitati a dire se 
state creando una tavola di figure a 
blocco o un’immagine. 

Se state creando una tavola delle 
figure vi sarà necessario introdurre i 
valori opportuni per VT, VB, HR, HL 
e SHNUM, che conviene scrivere su 
un foglio prima di introdurre questa 
parte del programma. Ricapitolando, 
che cosa sono questi valori? Ogni figu¬ 
ra a blocco è un blocco rettangolare di 
byte in alta risoluzione, delimitato in 
alto e in basso rispettivamente da VT e 
VB, e sui lati destro e sinistro rispetti¬ 
vamente da HR e HL. 

VT è la più alta coordinata Y conte¬ 
nente il byte della figura. VB è la più 
bassa coordinata Y contenente il byte 
della figura. I valori appropriati per 
VT e VB si possono trovare nel blocco 
Y= (0—191) alla base dello schermo. 

HR è l’offset d’indirizzo più a destra 
contenente il byte della figura. HL è 
l’offset d’indirizzo più a sinistra conte¬ 
nente il byte della figura. Si possono 
trovare i valori appropriati per HR e 
HL nel blocco HL-HR= (0-39) del¬ 
l’area di testo. 

Il valore che si introduce per N.FI¬ 
GURA (SHNUM) indica in che punto 
della memoria si vuole immagazzinare 
la tavola delle figure, ed è il byte alto 
dell’indirizzo esadecimale di memoria 
in cui comincerà la figura. SHNUM 
dev’essere nell’arco che va da 64 
($4000) a 146 ($9200). Se lo SHNUM 
che scegliete non lascia spazio suffi¬ 
ciente sotto il driver avrete istruzione 
di impostare un valore più basso. 

Poi si ha l’inserimento in memoria 
della figura con SCAN, la schermata 
sarà cancellata e la figura sarà ridise¬ 
gnata con l’impiego della routine 
DRAW del DHR.DRIVER. Se vole¬ 
te salvare la figura su dischetto basta 
che le diate un nome: la figura sarà 
salvata e il file protetto. 

Se state creando un’immagine in 
doppia Hi—Res, verrete invitati a dar¬ 
le un nome, dopo di che verrà salvata 
in due file separati sul dischetto. La 
parte deH’immagine proveniente dalla 
memoria principale sarà salvata in un 
file che ha in coda al nome "—PA- 
GE1", e la parte che proviene dalla 
memoria ausiliaria si troverà in un file 


al cui nome è aggiunto "—PAGE1X". 
Entrambi i file verranno protetti im¬ 
mediatamente dopo essere stati salva¬ 
ti. Il programma farà automaticamen¬ 
te un controllo per assicurare che non 
introduciate un nome troppo lungo. 

Come funziona 

Esaminato il programma e compre¬ 
so il suo funzionamento, dovreste ave¬ 
re una discreta idea del modo in cui si 
lavora con la doppia Hi—Res. Il pro¬ 
gramma impiega la grafica a tutto 
schermo e a schermo diviso, le conver¬ 
sioni di coordinate, la commutazione 
dei soft—switch (in gran quantità), i 
trasferimenti di memoria, e attiva e 
disattiva la doppia Hi—Res e la visua¬ 
lizzazione del testo a 80 colonne. 

Il cuore dell’intero programma è 
contenuto in una semplice istruzione 
HPLOT XC,Y che provvede a fare 
tutte le operazioni di disegno. Il trucco 
sta però nel determinare dove esatta¬ 
mente fare lo HPLOT, controllando 
poi tutti i flag appropriati per determi¬ 
nare quali effetti ciò abbia avuto nella 
memoria. Ecco che cosa fanno le varie 
parti del programma. 

La linea 140 carica in memoria il 
DHR.DRIVER (avrete bisogno delle 
routine del driver illustrate nei prece¬ 
denti articoli), poi imposta HIMEM 
per proteggere il driver e richiama SE¬ 
TUP per inizializzare i puntatori di 
YTABLE. 

Le linee 150-160 scrivono in me¬ 
moria con POKE una breve routine in 
codice macchina. Questo codice viene 
utilizzato dal programma per determi¬ 
nare la configurazione di bit in qualsia¬ 
si byte dei 16.384 dello schermo della 
doppia Hi —Res. 

Le linee 170—230 provvedono a 
procurare la predisposizione di scher¬ 
mo desiderata, o vuoto, con qualun¬ 
que grafica ci sia in memoria, o cari¬ 
cando un’immagine da dischetto. Nel 
caricamento di un’immagine da di¬ 
schetto prima viene caricata in PA- 
GE1 l’immagine di PAGE1X, poi vie¬ 
ne usato HGR per trasferirla in PA- 
GE1X. Dopo di ciò viene caricata la 
parte dell’immagine che è in PAGE1. 

Le linee 240—250 sono le stesse rou¬ 
tine di conversione utilizzate in prece¬ 
denza. Queste prima trovano in quale 
colonna siete (CX) e azionano il 
soft—switch di PÀGE2 per scegliere la 
memoria principale o quella ausiliaria 
(a seconda che la colonna sia dispari o 
pari). Poi la linea 22 converte la vostra 
coordinata X di doppia Hi —Res 
(0-559) nell’appropriata coordinata 
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•Industry standard «Full two-yaar warranty. 

coapatlbility 



•160 cps draft «Push feed tractor standard 
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•Fast line feed, high through-pat «Exceptional valua 

•Industry standard coapatlbility «Full two-year warranty. 



through-put «8K buffer standard 

•Industry standard «Exceptional value 

coapatlbility «Full two-year warranty. 

•Full bit image graphics 



NUOVISSIME DALLA CITIZEN 
ECCO LE VOSTRE PROSSIME STAMPANTI A MATRICE 


Progettate con la stessa cura e precisione con 
cui per oltre 50 anni sono stati costruiti milioni 
di orologi CITIZEN. 

Sia la MSP-20 (80 colonne) che la MSP-25 
(136 colonne) stampano alla incredibile 
velocità di 200 cps in DRAFT MODE e 50 cps 
in NLQ MODE mentre la MSP-10 (80 colonne) 
e la MSP-15 (136 colonne) stampano 
normalmente a 160 cps (40 cps in NLQ). 

Inoltre tutte le stampanti CITIZEN sono IBM e 
EPSON compatibili, usano tutte il sistema di 
avanzamento della carta a spinta, stampa 


proporzionale per produrre documenti così 
nitidi da farvi dubitare che siano stati eseguiti 
con una stampante a matrice. 

L'estetica molto curata conferisce alle stampanti 
CITIZEN una linea moderna ed essenziale che 
si adatta perfettamente in ogni ambiente. 

...e tutte sono coperte da 2 ANNI DI 
GARANZIA!!! 



COMPUTER GRAPHICS DIVISION 

MILANO: Via L. da Vinci, 43 - 20090Trezzano S/N 
Tel. 02/4455741/2/3/4/5 - Tlx: TELINTI 312827 


4l CITIZEN 

—’' COMPUTER PRINTERS 


ROMA: Via Salaria, 1319-00138 Roma 

Tel. 06/6917058-6919312 - Tlx: TINTRO1614381 

































Listato 1 
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20 

30 
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60 

70 
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360 
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420 
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440 

450 

460 


470 


490 

500 


REM 

REM 

REM 

REM 

REM 

REM 

REM 

PRINT 

7999: 


********************** 


TAVOLOZZA 
DI ROBERT DEVINE 
COPYRIGHT (0 1985 
BY APPLICANDO 4 
MICROSPARC, INC 


********************** 

CHR» <4)'BL0AD DHR.DRIVER': HIMEN: 37507: CALL 3 
REM CARICA DRIVER/PROTEGGE/PREDISPONE YTABLE 
POR X = 748 TO 774: READ Y: POKE X.Y: NEXT : REM CARIC 
A IN MEMORIA LA ROUTINE RECUPERO BIT 
DATA 162,0,134,252,70,251,38.252.96 

TEXT : HOME : VTAB 22: PRINT '* (C) 1985 BY APPLICANDO 
4 MICROSPARC VTAB 5: PRINT 'LAVORI CON SCHERMO PULÌ 
TO (P)': PRINT '0 CON IMMAGINE ESISTENTE (E) ?';: GET A 
» ’ 

PRINT : PRINT : IF A» = 'P' THEN HGR : CALL 37928: GOT 
0 260: REM PULISCE SCHERMO DHR 
PRINT 'L'IMMAGINE E' IN MEMORIA S/N ?*; : GET A»; PRINT 
: IF A» = *S' THEN 260 

HOME : PRINT CHR» <4)'CATAL0G': PRINT : INPUT 'NOME DE 
LLA FIGURA VjMi ONERR GOTO 870: REM SE IL FILE NOM 
ESISTE DISATTIVA DHR E SEGNALA L3ERR0RE 
PRINT CHR» <4)'PR#3*: CALL 37953: POKE 49235,0: HOME : 
CALL 37916: REM INIZIALIZZA DHR/GRAFICA E TESTO/PUL 
ISCE FINESTRA TESTO 

PRINT CHR» <4)’BL0AD'A»'-PAGE1X': POKE 49234,0: POKE 4 
9152,0: POKE 37948.54: CALL 37928: REM CARICA LA F1GU 
RA IN MEMORIA AUSILIARIA 

PRINT CHR» (4)'BLQAD"A»'-PAGE1" : GOTO 270: REM CARIC 
A LA FIGURA IN MEMORIA PRINCIPALE 
POKE 49236,0:CX = INT <X / 7): IF CX / 2 = INT (CX / 
2) THEN POKE 49237,0 

XC = INT (CX / 2) 4 X / 7 - CX:XC = INT <XC # 7 + .5) 
: RETURN : REM COPERTE X (0-559) IN XC (0-279) 

PRINT CHR» <4)'PRH3': CALL 37953: REM ATTIVA LA SCHE 
DA 80 COL/INIZ1ALIZZA DHR 

P = 3:CB = 1:F = 1:X = 0:Y = 0: POKE 230,32: GOSUB 240: 
HCOLOR= P:XO = X:YO = Y: GOTO 470: REM INIZIALIZZA M 
ODO PLOT/COLORE BIT/VELOCITA'=LENTA 
VTAB 15: GET A*: PRINT : IF A» = 'V THEN L = 1: GOTO 5 
10: REM INTRODUCE MODO 'VISITA' 

IF A4 = CHR4 (11) THEN Y = Y - F: GOTO 410: REM SPOST 
A IN SU 

IF A4 = CHR4 (10) THEN Y = Y + F: GOTO 410: REM SPOST 
A IN GIU' 

IF A4 = CHR4 (8) THEN X = X - F: ON <F = 4) GOTO 410:C 
B = CB - 1: GOTO 410: REM SPOSTA A SINISTRA 
IF A4 = CHR4 (32) THEN X = X + F: ON (F = 4) GOTO 410: 
CB = CB + 1: GOTO 410: REM SPOSTA A DESTRA 
IF A4 = 'F' THEN F = 4: GOTO 510: REM CAMBIA IN VELOCE 
IF A4 = 'S' THEN F = 1: GOTO 510: REM CAMBIA IN LENTO 

IF A4 = 'G' THEN POKE 49234,0: GOTO 280: REM GRAFICA 
TUTTO SCHERMO 

IF A4 = 'T' THEN POKE 49235,0: GOTO 280: REM RIPRISTI 
NA FINESTRA TESTO 

IF A4 = 'N' THEN P = 0:L = 0: GOTO 450: REM INTRODUCE 
MODO NOPLOT 

IF A4 = 'P' THEN P = 3:L = 0: GOTO 450: REM INTRODUCE 
MODO PLOT 

IF A4 = CHR4 (19) THEN HOME : PRINT CHR4 (12); CHR4 
(21): CALL 37966: GOTO 670: REM SALVA LA FIGURA 
GOTO 280: REM COMANDO ERRATO 
IF X < 0 THEN X = 0: GOTO 280 
IF X ) 559 THEN X = 559: GOTO 280 
IF Y ( 0 THEN Y = 0: GOTO 280 
IF Y ) 191 THEN Y = 191: GOTO 280 
GOSUB 240: ON L GOTO 470: HCOLOR= P: IF P = 3 THEN HPL 
OT XC,Y:XO = X:YO = Y: GOTO 470 
XI = X:Y1 = Y:X = XO:Y = YO: GOSUB 240: HPLOT XC,Y:X = 
XI:Y = Yl: GOSUB 240: HCOLOR= 3: HPLOT XC,Y:XO = X:YO = 
Y: REM MODO NOPLOT 

POKE 6,Y: CALL 37988:B = PEEK (38) ♦ PEEK (39) « 256 
♦ INT (XC / 7>:V = PEEK (B) 

VTAB 21: PRINT 'COLOMW='CX' POKE 1403,12: IF CX / 

2 = INT (CX / 2) THEN PRINT J PAGIfW=IX'; : GOTO 500 
PRINT "PAGINA=1 

POKE 1403,24: PRINT 'HPLOT 'X'='XC 
PRINT , X= i X' ';: POKE 1403,48: PRINT 


:: POKE 1403.40: 
'Y='Y' POKE 


1403,60: PRINT 'INDI RIZ20='B' ' 

510 VTAB 22: IF L = 1 THEN PRINT 'MODO-VISITA'; : GOTO 540 
520 IF P = 3 THEN PRINT 'MODO-PLOT GOTO 540 

530 PRINT 'MODO-NOPLOT 

540 POKE 1403,40: IF F = 1 THEN PRINT 'VELOCITA'=LENTA ': 
GOTO 560 

550 PRINT 'VELOCITA'=VELOCE' 

560 VTAB 23: PRINT 'VALORE BYTE='V ':: POKE 1403,16: PRIN 
T "BITS=': : REM STAMPA VALORE DEL BYTE 
570 POKE 251,V:B4 = " 

580 FOR M = 1 TO 8: CALL 768: IF PEEK (252) = 1 THEN B4 = 
B4 * T: GOTO 600 
590 B4 = B4 + '0' 

600 NEXT : FOR M = 1 TO 8 

610 IF M = XC - (7 « ( INT (XC / 7))) ♦ 1 THEN INVERSE : R 
EN INVERTE IL BIT CORRENTEA 

620 PRINT MID4 <B4,M,1);: NORMAL : PRINT ' '; : NEXT : PRIN 

■y ■ ■ , » » i i 

630 POKE I403,40: PRINT 'HL-HR=‘ INT (XC / 7)' ';: POKE 140 
3.52: PRINT 'BLOCCO COLORE=‘ INT (X / 4)' '; 

640 POKE 1403,70: IF CB = 5 THEN CB = 1 
650 IF CB = 0 THEN CB = 4 
660 PRINT 'N.BIT';CB: GOTO 280 

670 HOME : VTAB 6: PRINT 'VUOI SALVARE LA FIGURA (S/N) ?';: 

GET A4: PRINT : IF A» = 'N' THEN 970 
680 VTAB 10: PRINT 'TAVOLA FIGURE (T) o FIGURA (F) ?';: GET 
A*: PRINT : IF A» < > T AND A» < > 'F' THEN 680 
690 IF A$ = 'F' THEN 880 

700 HOME : INPUT 'INTRODUCI VT (0 -39) ':VT: PRINT 
710 INPUT 'INTRODUCI VB (VT-39) ';VB: PRINT 

720 INPUT 'INTRODUCI HR (HL-39) ':HR: PRINT 

730 INPUT 'INTRODUCI HL (0 -39) ";HL: PRINT : PRINT 

740 INPUT 'NUMERO DELLA FIGURA (64-146) ?';Slt4UM: PRINT 

750 IF ((VB - VT * 1) * (HR - HL > !)) * 2 t SIMUN * 256 > 
37506 THEN PRINT : FLASH : PRINT 'LA TAVOLA DELLE FIGU 
RE E' TROPPO GRANDE": NORMAL : PRINT : HTAB 6: PRINT 'S 
CEGLI UN NUMERO PIU' BASSO': PRINT : GOTO 740 
760 PRINT 'I PARAMETRI SONO GIUSTI ? (S/N)'; : GET A*: PRINT 
: IF A4 < > 'S' THEN 700 

770 HIMEM: SWUM * 256: REM REIMPOSTA HIMEM A PROTEGGERE 
LA FIGURA 

780 POKE 251,SIMUN: POKE 252,VT: POKE 253,V8: POKE 254,HR: 
POKE 255,HL 

790 PRINT CHR» (4)'PRH3': CALL 37953: POKE 49153,0: CALL 3 
7850: REM CREA TAVOLA DELLE FIGURE 
800 HGR : POKE 49152.0: CALL 37928: POKE 251.S1MUM: POKE 49 
153,0: CALL 37780: POKE 49236.0: REM POLISCE SCHERMO 
E DISEGNA LA FIGURA DELLA TAVOLA 
810 HOME : VTAB 21: PRINT 'ECCO LA FIGURA NELLA TAVOLA.': P 
RINT 'VUOI SALVARLA!S/N) ?'; : GET A»: PRINT 
820 IF A* = 'N' THEN 865 

830 HOME : VTAB 22: INPUT ‘QUAL E' IL NOME ?';A» 

840 HOME : VTAB 22: PRINT 'STO SALVANDO LA FIGURA SUL DISCH 

ETTO' 

850 PRINT CHR4 (4)'BSAVE 'A»'.A'SIMUM * 256',L'((VB - VT ♦ 
1) * (HR - HL * D) » 2 
860 PRINT CHRI <4)'L0CK'A» 

865 PRINT CHR» (12); CHR» (21): CALL 37966: GOTO 970 

870 PRINT CHR» (12); CHR4 (21): CALL 37966: INVERSE : PRIN 

T 'IL FILE NON ESISTE': NORMAL : PRINT 'PREMI UN T 
ASTO PER CONTINUARE': GET Kt: PRINT : GOTO 170 
880 PRINT : PRINT : INPUT 'BATTI IL NOME DELLA FIGURA: ';A4 
: ONERR GOTO 980 

890 IF LEN (A4) > 23 THEN PRINT : FLASH : PRINT 'IL NOME 
E' TROPPO LUNGO*: NORMAL : GOTO 880 
900 PRINT : HTAB 9: PRINT 'STO SALVANDO LA FIGURA': PRINT : 

HTAB 9: PRINT 'DALLA MEMORIA PRINCIPALE' 

910 F4 = A4 + '-PAGE!': PRINT CHR4 <4)'BSAVE'F4',A42000,L4 
2000' 

920 PRINT CHR» (4)'L0CK'F4 

930 CALL 37953: POKE 49236,0: POKE 49152.0: POKE 37948,24: 
CALL 37928: CALL 37966: REM TRASFERISCE PAGE1X A PAGE 
1 

940 CALL - 936: VTAB 10: HTAB 9: PRINT 'STO SALVAMOO LA FI 
GURA': PRINT : HTAB 9: PRINT 'DALLA MEMORIA AUSILIARIA' 
950 F» = A* ♦ '-PAGEIX': PRINT CHR» (4)'BSAVE'F4',A42000,L 
42000' 

960 PRINT CHR» (4)'LOCK'F» 

970 PRINT : PRINT CHR» <4)"CATALOG': END 
980 PRINT : PRINT "ERRORE I/O DISCHETTO-RITENTA* : GOTO 880: 
REM NON PUOI SALVARE IL FILE CON LO STESSO NOME SE Q 
UESTO E' PROTETTO - CAMBIA IL NOME 
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X di HPLOT (0—279) che vi occorre. 

La linea 260 attiva la scheda espansa 
a 80 colonne e inizializza la doppia 
Hi-Res. 

La linea 270 imposta i modi di avvio 
del programma. 

La linea 280 utilizza l’istruzione 
GET per ricevere il vostro input. 

Le linee 280-400 prendono il vo¬ 
stro input, impostano i flag opportuni 
e azionano gli interruttori appropriati 
per attuare i vari comandi. Notate che 
le linee 160-170 impiegano i POKE 
della Hi—Res normale per commutare 
fra il modo di grafica a tutto schermo e 
quello misto testo/grafica. La linea 195 
disattiva la scheda a 80 colonne e la 
doppia Hi —Res, in preparazione per 
la parte del programma che salva l’im¬ 
magine. 

Le linee 410—440 fanno un test per 
impedire che il cursore esca dallo 
schermo, il che avrebbe come risultato 
un errore nel programma e il suo con¬ 
seguente blocco. 

Le linee 450—460 gestiscono il dise¬ 
gno vero e proprio. Se si è in VISITA, 
il comando HPLOT viene scavalcato 
di modo che non c’è alcun effetto sullo 
schermo. Se si è in fase di tracciamen¬ 
to (PLOT) il bit corrente viene messo 
a 1. Per NOPLOT viene compiuto 


qualche passo in più, in quanto dovete 
tornare all’ultimo punto e cancellarlo 
prima di spostarvi avanti a indicare la 
corrente locazione del marcatore. 

La linea 470 utilizza la routine 
YADDR per trovare l’indirizzo del 
vostro byte e immagazzina l’indirizzo 
in B, mentre il valore del byte va in V. 

Le linee 480—560 cominciano a 
stampare i vari valori d’informazione 
in basso sullo schermo. Dovreste nota¬ 
re l’uso di istruzioni POKE 1403 (co¬ 
me richiede la scheda a 80 colonne) in 
luogo di HTAB o POKE 36. 

Le linee 570—590 determinano la 
configurazione di bit del presente by¬ 
te. Prima viene messo nella locazione 
di memoria 251 il valore di byte V. Poi 
viene richiamata otto volte con CALL 
la routine di recupero del bit. Ogni 
volta un bit viene preso dalla locazione 
251 e messo nella locazione 252, dove 
viene testato e costruito, bit per bit, 
nella stringa B$. 

Le linee 600-620 stampano l’op¬ 
portuna configurazione di bit "01234 
5 6 1 " (il rovescio dell’ordine normale) 
e mostrano, in Inverse, il bit sul quale 
ci si trova al momento. 

Le linee 630—660 stampano il resto 
delle informazioni di schermo e poi 
saltano indietro alla linea 90, dove vie¬ 


ne ottenuto il successivo comando da 
tastiera. 

La linea 670 è l’inizio delle routine 
di salvataggio della figura o dell’imma¬ 
gine. Se non volete salvare il lavoro 
fatto l’esecuzione salta alla linea 970 
dove il programma finisce. 

Le linee 670-770 invitano a intro¬ 
durre i valori appropriati per VT, VB, 
HR, HL e SHNUM. Vengono mostra¬ 
te le estensioni legali per ciascun valo¬ 
re. Prima di procedere viene fatto un 
controllo per accertare che, in base 
alle dimensioni della figura e dello 
SHNUM scelto, ci sia spazio sotto il 
driver per la tavola delle figure. Se non 
lasciate spazio a sufficienza verrete in¬ 
vitati a introdurre per SHNUM un va¬ 
lore più basso. 

La linea 790 gestisce la creazione 
della tavola delle figure. Notate che 
sono state attivate la scheda, la doppia 
Hi - Res e 80STORE e che è stato usa¬ 
to SCAN per creare la tavola. 

La linea 800 cancella la figura dallo 
schermo utilizzando la routine HGR, 
poi ridisegna la figura utilizzando 
DRAW e le informazioni contenute 
nella tavola delle figure che si trova 
adesso in memoria. E stato disattivato 
80STORE prima di impiegare la routi¬ 
ne HGR del DHR.DRIVER. Questo 
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Distributore esclusivo per l'Italia 


TUTTO 

PER LA PULIZIA 
DEL COMPUTER 


La polvere, il fumo, le contaminazioni 
esterne, possono deteriorare le 
apparecchiature o cancellare i dati. 
Un costante uso dei prodotti pulizia, 
mantiene inalterati dischi, nastri, 
superaci, carte di credito, ecc. 

Tutti i prodotti sono omologati dalle 
migliori case producici di drive. 


Speciali confezioni, in formato 
economico, studiate appositamente per 
la pulizia dei minicomputers, contengono 
prodotti, facili da usare, che assicurano 
una corretta protezione dei video, 
tastiere, drive 3" 1/2, 5" 1/4. 
In vendita anche presso i negozi Buffetti. 
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perché la routine HGR (che è in realtà 
un trasferimento di memoria) non fun¬ 
zionerà con 80 STORE ATTIVATO. 
Dopo aver fatto il trasferimento (che 
cancella PAGE1X) riattivate 80STO- 
RE in modo che la routine DRAW 
funzioni. 

Nota particolare: a questo punto 
merita un’occhiata l’ultima istruzione 
di linea 800, POKE 49236,0. Una vol¬ 
ta che l’intero programma è in memo¬ 
ria, gira a dovere e lo avete messo al 
sicuro salvandolo su dischetto, prova¬ 
te a fare questo esperimento. Togliete 
il POKE 49236,0 dalla linea 800, poi 
fate girare il programma. Disegnate 
prima una figura piccola, e quindi in¬ 
serite <CTRL>S, per utilizzare le 
routine di salvataggio, e i parametri 
della figura. Quando vi viene chiesto 
se volete salvare la figura rispondete 
"NO". Dovreste vedere adesso la 
schermata che si altera un po'; poi tut¬ 
to rimarrà in sospeso. Adesso premete 
<CTRL><RESET> per recuperare 
il controllo e listare con LIST il pro¬ 
gramma. Come presto vedrete il pro¬ 
gramma è stato distrutto! L’ovvio in¬ 
terrogativo è: perché? 

Noterete che quando avete risposto 
di no l’esecuzione è saltata a linea 800, 
dove la scheda a 80 colonne e la doppia 
Hi—Res sono state disattivate ; poi sie¬ 
te andati alla linea 970 che si è limitata 
a fare il catalogo del dischetto. Non 
sembra che ci sia niente di dannoso in 
alcuna di queste istruzioni. Il metodo 
utilizzato per disattivare la scheda è lo 
stesso che è stato usato nella linea 390, 
che non ha causato problemi di sorta. 
Il fatto è che è stato il comando catalog 
a distruggere il programma. 


Adesso tornate alla linea 800: note¬ 
rete che l’istruzione immediatamente 
davanti al POKE 49236,0 (che è stato 
rimosso) era un CALL alla routine 
DRAW, che è stata eseguita a dovere 
e ha disegnato la figura. Poi, tornando 
alla routine DRAW (per il listato di 
questa routine vedete l’articolo pub¬ 
blicato sul N. 20 di Applicando a pag. 
75), constaterete che quando lasciate 
la routine il soft-switch di PAGE2 è 
impostato su PAGE1X. Quando si usa 
la scheda a 80 colonne questo soft— 
switch è usato per scegliere fra memo¬ 
ria principale e memoria ausiliaria. 
Tuttavia quando la scheda è OFF lo 
stesso soft—switch viene usato per sce¬ 
gliere fra HGR e HGR2, o fra la pagi¬ 
na 1 di TEXT e la pagina 2 di TEXT. 

Quando avete disattivato la scheda 
e fatto il catalog del dischetto il display 
del catalogo vi è stato presentato sulla 
pagina 2 di TEXT a causa del modo in 
cui era impostato il soft—switch. Se 
consultate la pagina 26 dell’ Apple Ile 
Reference Manual, vedrete che la pa¬ 
gina 2 di TEXT risiede nell’area di 
memoria $800—$BFF, la stessa area di 
memoria occupata dal vostro pro¬ 
gramma. Il catalogo del dischetto è 
stato scritto in cima al vostro program¬ 
ma! 

Tutto lo scopo di questo discorso è 
dimostrare l’importanza di lasciare il 
soft-switch di PAGE2 impostato nel 
modo giusto quando si esce dalla dop¬ 
pia Hi-Res. 

Le linee 820—860 provvedono a sal¬ 
vare la figura su dischetto e a proteg¬ 
gere il file. 

La linea 870 disattiva la scheda a 80 
colonne e la doppia Hi—Res. 


Le linee 880—920 salvano l’immagi¬ 
ne Hi—Res esistente nella memoria 
principale (PAGE1 — colonne dispa¬ 
ri) e proteggono il file. 

La linea 930 trasferisce nella memo¬ 
ria principale la porzione d’immagine 
esistente nella memoria ausiliaria. Pri¬ 
ma viene inizializzata la doppia Hi— 
Res, il soft-switch di PAGE2 è impo¬ 
stato sulla memoria principale e 
80STORE è disattivato. Poi la routine 
HGR viene modificata con l’aggiunta 
dell’istruzione CLC (Clear Carry, pu¬ 
lire il carry), a indicare che volete spo¬ 
starvi da PAGE IX a PAGE1, e il 
trasferimento viene concretamente ef¬ 
fettuato. Infine la doppia Hi—Res vie¬ 
ne nuovamente eliminata. La parte 
d’immagine esistente nella memoria 
ausiliaria (PAGE1X - colonne pari) 
risiede adesso nella memoria principa¬ 
le. 

Le linee 940—970 salvano su di¬ 
schetto la seconda metà dell’immagi¬ 
ne, proteggono il file, fanno il catalogo 
del dischetto e mettono fine al pro¬ 
gramma. 

La linea 980 protegge il programma 
dal pericolo di bloccarsi nel caso di un 
errore di dischetto durante un SA VE. 
Gli errori di dischetto possono essere 
causati da molte cose, la più comune 
delle quali è cercare di rifare il SAVE 
di un'immagine che si trova in un file 
protetto del dischetto. Se questo acca¬ 
de basta che usiate un nome di file 
differente. 


Questo programma è disponibile su 
dischetto. L'elenco, i prezzi e le 
modalità d’ordine di questo e degli altri 
dischetti disponibili sono riportati nella 
rubrica Disk Service. 
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Per chi 
comincia 



N uovi lettori, siate i benvenuti. Queste 
pagine sono per voi, e le ripeteremo a 
ogni numero per facilitare il primo incontro 
con Applicando e con il mondo di Apple. 
Ovviamente queste righe non intendono 
sostituire i manuali, dei quali consigliamo 
caldamente la lettura, ma possono bastare 
per chi intende soltanto utilizzare i pro¬ 
grammi che pubblichiamo, copiarli, salvar¬ 
li su dischetto e farli partire. 

Cominciamo con qualche rapidissima 
premessa su Apple //. Quando accendete 
per la prima volta il vostro Apple con un 
dischetto già inserito nel drive e la tastiera 
posizionata sull'inglese (per chi possiede 
Apple //e e //c), dovreste veder comparire 
sullo schermo il segno "]”, chiamato curso¬ 
re, o prompt, in inglese. Mentre se avete la 
tastiera posizionata su italiano, vedrete é. 
La sua presenza significa che potete fare 
una di queste tre cose: 

1) Fornire al computer comandi destinati 
al drive (per esempio CATALOG mostra il 
contenuto del dischetto, se si tratta di un 
dischetto in Basic). 

2) Fornire comandi nella versione per 
Apple del linguaggio Basic (e cioè l’Apple¬ 
soft Basic). 

3) Battere sulla tastiera righe di pro¬ 
grammi in Applesoft Basic. 

Per copiare un programma da Applican¬ 
do potrà essere necesario fare tutte e tre le 
cose. 

Per battere un programma 

di applicando 

Per prima cosa sarà opportuno leggere 
fino in fondo l’articolo che accompagna il 
programma. Può darsi che non capiate pro¬ 
prio tutto la prima volta: non preoccupate- 
vene, in seguito diventerà facilissimo. Cer¬ 
cate soprattutto le eventuali istruzioni che 
spiegano se occorre fare qualcosa di parti¬ 
colare per battere il programma. In ogni 
caso assicuratevi di aver pronto un dischet¬ 
to già inizializzato per poter salvare quel 
che avrete battuto. Per i dettagli su come 
inizializzare un dischetto vergine, guardate 
i manuali: chi proprio ai manuali fosse al¬ 
lergico, faccia così: a Apple spento inseri¬ 
sca il dischetto System Master nel drive 1, e 
accenda il computer: quando il drive avrà 
smesso di girare (lueina rossa di nuovo 
spenta), tolga il System Master dal drive e 
inserisca al suo posto un dischetto sicura¬ 
mente vergine e sicuramente mai usato (at¬ 
tenzione: si possono ri-inizializzare anche 
dischetti già usati, ma il loro contenuto va 
irrimediabilmente perso); ora basta battere 
NEW, Return, e poi INIT HELLO, sem¬ 
pre seguito da Return. 

Tutti i programmi in Basic consistono di 
una sequenza di righe di istruzioni. Tutte le 


righe sono numerate all’inizio, e possono 
contenere una o più istruzioni. Se le istru¬ 
zioni sono più d’una, esse saranno separate 
da segni di due punti (:). Per esempio: 


20 FOR J = 1 TO 5 : P R I N T 
CHR$(7):NEXT J 


Per copiare da Applicando un program¬ 
ma, inserendolo nel vostro Apple, occorre 
assicurarsi che la memoria operativa del 
computer sia vuota battendo NEW Return 
(questa istruzione non cancella nulla di ciò 
che è registrato sui vostri dischetti: libera 
soltanto la memoria del computer dall'ulti¬ 
mo programma usato), ed è necessario poi 
battere i listati così come sono stampati, 
riga per riga, compresi i numeri di riga, 
battendo Return solo quando si arriva al 
numero di riga successivo. Quando sarà 
stata copiata anche l’ultima riga e l’ultimo 
Return (a fine riga), si potrà salvare il pro¬ 
gramma su dischetto (il dischetto che avete 
inizializzato, o un altro già inizializzato in 
precedenza su cui ci sia spazio libero a suffi¬ 
cienza). Per salvarlo basterà battere il co¬ 
mando SAVE, seguito dal nome che inten¬ 
dete dare al programma che avete trascrit¬ 
to. Questo è tutto, ma vediamo passo per 
passo un esempio. 


10 REM CAMPANELLO 
20 FOR J = 1 TO 5 : P R I N T 
CHR$(7):NEXT J 
30 END 

Listato 1 


Per battere il semplice programma Cam¬ 
panello del listato 1 (produce solo un suono 
simile a quello di un campanello, null’al- 
tro), si seguirà questa sequenza: 

1) Battete NEW Return per cancellare 
dalla memoria qualsiasi programma prece¬ 
dentemente usato. (Se state lavorando su 
un Apple //e o un //c assicuratevi che il tasto 
CAPS LOCK, il primo in basso a sinistra, 
quello che permette di ottenere tutte maiu¬ 
scole, sia schiacciato). 

2) Battete la linea 10 esattamente com’è 
stampata e premete il tasto Return solo alla 
fine dell’ultima parola (CAMPANELLO). 

3) Battete allo stesso modo anche le linee 
20 e 30. 

4) Con un dischetto già inizializzato nel 
drive (nel drive 1, se ne avete due), battete 
SAVE CAMPANELLO Return, per regi¬ 
strare il vostro programma su dischetto. 

5) Poiché il vostro programma è ancora 
nella memoria del computer, per farlo gira¬ 
re basterà battere RUN e premere il tasto 
Return. Se cancellate la memoria facendo 
girare un altro programma o spegnendo il 


computer, per usare nuovamente il pro¬ 
gramma occorrerà inserire il dischetto nel 
drive e battere RUN CAMPANELLO Re¬ 
turn. 

Alcuni suggerimenti 

I suggerimenti che seguono possono ren¬ 
dere il lavoro di trascrizione un po’ più 
facile: 

1) Se commettete un errore di battitura 
in una riga e non avete ancora premuto il 
tasto Return, basterà tornare indietro con 
la freccetta sinistra, correggere l’errore, e 
tornare al punto in cui eravate con la frec¬ 
cetta destra, premendo Return come al so¬ 
lito solo a completamento dell’intera riga. 
Se invece vi accorgete dell’errore quando 
ormai avete premuto Return e siete passati 
a un'altra riga, completate tranquillamente 
la riga che state scrivendo, compreso il Re¬ 
turn finale; poi ribattete la riga in cui avete 
commesso l’errore: ribattetela per intero, 
con numero di riga e tutto il resto, e la 
nuova versione prenderà automaticamente 
il posto della vecchia. 

2) Siate particolarmente attenti a non 
commettere errori di trascrizione nelle ri¬ 
ghe in cui compare l’istruzione DATA. 
Nelle altre istruzioni un eventuale sbaglio è 
più facile da individuare, perché penserà 
eventualmente il computer a segnalarlo in 
seguito, nelle istruzioni DATA questo in¬ 
vece non avviene. 

3) Salvate periodicamente il programma 
mentre procedete, per minimizzare i guai 
di una eventuale interruzione di corrente. 
Se non avete tempo per trascrivere tutto il 
progamma, trascrivete fin dove potete o 
volete (ma comunque completando fino al 
Return la riga che state battendo), poi sal¬ 
vatelo su dischetto come se aveste finito. 
Per riprendere a trascrivere sarà sufficiente 
inserire il dischetto nel drive, accendere il 
computer, e battere LO AD seguito dal no¬ 
me che avete dato al programma, e da Re¬ 
turn (battete CATALOG se non ricordate 
più con che nome avete salvato il program¬ 
ma). La luce rossa sul drive si accenderà, e 
il vostro programma verrà caricato nella 
memoria operativa del computer. A questo 
punto battete LIST, e vedrete scorrere sul¬ 
lo schermo tutta la parte del programma 
che avevate già battuto. Continuate adesso 
tranquillamente dal punto in cui avevate 
interrotto. 

4) Prima di effettuare modifiche o ag¬ 
giunte, trascrivete l’intero programma e fa¬ 
telo girare per prova. Questo renderà più 
facile la ricerca di eventuali errori, isolando 
quelli commessi durante la battitura e la 
trascrizione. Non preoccupatevi per il nu¬ 
mero di errori di trascrizione che farete: è 
normale. Il computer vi segnalerà, riga per 
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riga, dove avete sbagliato. Basterà a questo 
punto controllare la riga, individuare l’er¬ 
rore commesso e ribattere correttamente 
l'intera riga. A questo punto occorre salva¬ 
re di nuovo il programma su dischetto. 

5) Le lettere minuscole possono essere 
usate solo aU’interno di comandi che inclu¬ 
dono REM o tra virgolette. 

Programmi in 
linguaggio macchina 

Il Basic e il Dos sono ottimi linguaggi, 
ideati apposta per rendere più facile la pro¬ 
grammazione, ma l’Apple è in grado di 
ricevere comandi anche in un codice molto 
più vicino alla sua logica, chiamato linguag¬ 
gio macchina. Il linguaggio macchina è un 
po’ la lingua madre dell’Apple, un pro¬ 
gramma così composto sarà quindi compre¬ 
so dal computer molto più velocemente di 
un programma scritto in Basic. Per creare 
programmi in questa lingua si usa spesso un 
programma chiamato Assembler. L’As- 
sembler permette al programmatore di 
scrivere in un codice più facile del linguag¬ 
gio macchina: l’assembly. In un secondo 
momento il programma stesso si tradurrà in 
linguaggio macchina. L’Apple infatti non 
conosce l’assembly. 

Molti dei programmi che troverete su 
APPLICANDO saranno scritti in ambe¬ 
due le versioni: assembly e linguaggio mac¬ 
china; in questo modo potrete inserire le 
istruzioni direttamente in linguaggio mac¬ 
china, senza dovervi procurare il program¬ 
ma Assembler. In questo caso le istruzioni 
dovranno essere inserite direttamente nel 
System Monitor (da non confondere col 
monitor video): per raggiungere il System 
Monitor è sufficiente battere CALL-151 e 
schiacciare il tasto Return. A questo punto 
sullo schermo comparirà un asterisco (*) 
che indica che è stato raggiunto il contatto 
con il System Monitor. Per inserire i listati 
scritti in linguaggio macchina occorrerà al¬ 
lora battere, per esempio, i seguenti co¬ 
mandi: 


300: A2 05 20 DD FB CA F0 03 4C 02 03 60 
Return 


In questa serie di istruzioni il ’300’ indica 
una locazione di memoria e i due punti 
dicono all’Apple di inserire i seguenti nu¬ 
meri (A2 e gli altri numeri in base 16) in 
quella locazione. I numeri sono in base 16 
(esadecimale); non è necessario saper cal¬ 
colare con questa base per trascrivere i pro¬ 
grammi in linguaggio macchina, ma è im¬ 
portante sapere che in questo tipo di lin¬ 
guaggio i numeri sono dati sempre in esade¬ 
cimale. 

Facciamo un breve esempio di program¬ 
ma scritto in linguaggio macchina. Il se¬ 
guente listato serve a indirizzare alcuni dati 
in una particolare locazione di memoria: 


300.30B 

0300-A2 05 20 DD FB CA F0 03 
0308-4C 02 03 60 

Listato 2 


I numeri a sinistra delle lineette (atten¬ 
zione: le lineette non vanno digitate, al loro 
posto occorre battere un "due punti") sono 
le locazioni di memoria, vale a dire gli indi¬ 
rizzi dello spazio di memoria in cui il dato 
dovrà essere conservato, e i numeri seguen¬ 
ti sono il contenuto, i dati da memorizzare 
nelle sette locazioni di memoria indicate. I 
due numeri separati da un punto presenti 
nella prima riga indicano gli indirizzi inizia¬ 
li e finali della parte di memoria considera¬ 
ta. Questo programma è la traduzione del 
listato numero tre, scritto in assembly. Co¬ 
me si noterà le colonne a sinistra sono mol¬ 
to simili al listato numero due, contengono 
infatti le locazioni di memoria, mentre la 
parte a destra contiene istruzioni in assem¬ 
bly. Esistono diversi programmi assembler 
e diverse disposizioni dei listati, ma in tutti 
sono presenti queste due diverse colonne. 


1 *RINGER PROGRAM 



2 

ORG 

$300 


3 

BELL EQU 

$FBDD 

0300: A2 05 

4 

LDX 

#$5 

0302: 20 DD FB 5 

LOOP JSR 

BELL 

0305: CA 

6 

DEX 


0306: F0 03 

7 

BEQ 

END 

0308: 4C 02 03 

8 

JMP 

LOOP 

030B: 60 

9 

END RTS 



Listato 3 



Per inserire i listati nella macchina è suf¬ 
ficiente eseguire le seguenti operazioni: 

1) Digitare CALL-151 Return per en¬ 
trare in contatto con il System Monitor, poi 
inserire la locazione di memoria, i due pun¬ 
ti e il contenuto della memoria; nel caso del 
listato numero due ad esempio si digiterà: 


300:A2 05 20 DD FB CA F0 03 Return 
308:4C 02 03 60 Return 


Un programma in Assembler sarà invece 
così inserito: 


300: A2 05 Return 
302:20 DD FB Return 
305:CA Return 
306: F0 03 Return 
308:4C 02 03 Return 
30B:60 Return 


State attenti a non inserire lo spazio tra i 
due punti e il primo numero seguente, 
mentre invece bisogna mettere lo spazio fra 
le coppie di numeri. 

2) Una volta inserito l'intero listato, 
schiacciate CTRL—C Return per tornare al 
livello BASIC indicato dal segno ’]'. 

3) Al contrario dei programmi in BASIC 
che iniziano nella stessa locazione di me¬ 
moria, e che possono essere salvati con un 
semplice SAVE, i programmi scritti in lin¬ 
guaggio macchina possono iniziare in di¬ 
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versi punti della memoria. Per salvare lista¬ 
ti o dati in linguaggio macchina si dovrà 
indicare quindi la locazione alla quale ha 
inizio il programma da salvare e la lunghez¬ 
za dello stesso (in decimale o in esadecima¬ 
le). Per il programma usato prima come 
esempio, il comando sarà: 

BSAVE RINGER, AS300, L$C 

dove A$300 è la locazione di memoria di 
inizio programma e L$C è la lunghezza del 
programma (la lettera C corrisponde al nu¬ 
mero decimale 12). All’inizio dei listati in 
linguaggio macchina pubblicati su Appli¬ 
cando troverete sempre l'indicazione della 
locazione di memoria di inizio e fine pro¬ 
gramma; esempio: 300.3EA mentre nel 
corso dell’articolo troverete i parametri per 
salvare il programma, esempio: BSAVE 
RINGER, A$300,L$C. 

4) Per rivedere il listato che avete tra¬ 
scritto basterà battere 300.30B, e sullo 
schermo si riprodurrà tutto ciò che avete 
battuto. Per ottenere una copia sulla stam¬ 
pante, basterà battere PR # (£ se siete in 
tastiera italiana) seguito dal numero dello 
slot al quale avete collegato la stampante 
(normalmente il n. 1) Return e poi ancora 
300.30B Return. Le correzioni si fanno ri¬ 
battendo solo la riga contenente eventuali 
errori. 

5) Per far girare il programma basterà 
allora digitare BRUN RINGER, senza 
l'indirizzo. 

Quanto esposto sopra è valido sia per il 
DOS 3.3 (sistema operativo per la gestione 
del drive che veniva fornito prima dell’usci¬ 
ta del Ile) sia per il ProDOS (sistema opera¬ 
tivo fornito con il Ile). Usando il ProDOS 
occorre però fare alcune precisazioni. 

I comandi del tipo SAVE, LOAD, 
RUN, CATALOG, ecc. vengono accettati 
anche in forma minuscola. 

Per formattare un disco non si potrà più 
usare il comando INIT HELLO, ma sarà 
necessario usare il disco UTILITIES di Si¬ 
stema fornito con il computer. Durante 
questa operazione vi verrà chiesto se il no¬ 
me del disco, assegnato automaticamente 
dal computer, va bene oppure se volete 
cambiarlo. Infatti tutti i dischi formattati in 
ProDOS (indicati come Volume) hanno un 
nome e vengono riconosciuti indicando 
questo nome dopo un comando diretto al 
drive. Per esempio se volete vedere il cata- 
log di un disco chiamato BLANK, dovete 
battere CAT/BLANK. 

Per non ripetere continuamente il nome 
del disco potete battere, prima dei comandi 
diretti al drive, PREFIX/nome disco segui¬ 
to da RETURN. Da questo momento tutti 
i comandi al drive saranno diretti automati¬ 
camente al disco scelto. 

Per vedere il catalog è sufficiente battere 
CAT. 

Durante l'uso di alcuni programi scritti in 
ProDOS potreste trovarvi una richiesta del 
tipo "PATHNAME?"; non spaventatevi, il 
pathname è il nome del disco al quale vo¬ 
gliamo fare riferimento, scritto entro due 
barrette (/) e seguito dal nome del file che 
vogliamo salvare o caricare in memoria op¬ 
pure trasferire da un disco a un altro. 
















pratica 


Non è un Server 

A meno di un mese di distanza dalla pubblicazione 
dell’articolo sugli Hard—disk per Macintosh, sembra in¬ 
credibile che ci siano già utenti Macintosh che utilizzano i 
dischi fissi della Sunol. 

Innanzitutto un importante distinguo: l’hard—disk Su¬ 
nol può essere collegato in rete, e quindi condiviso da più 
utenti, ma allo stato attuale dei fatti è solo un Disk 
Server, non un File—Server; ciò vuol dire che non è 
possibile regolare e controllare il flusso di informazioni 
da e per il Mac. Se quindi si accede contemporaneamente 
allo stesso documento in più utenti, si determina una 
sovrapposizione di registrazioni o di modifiche che por¬ 
tano in crash tutto il sistema in rete. La Cesac, interpella¬ 
ta in merito, ha assicurato che sarà presto disponibile 
questo hard-disk per la rete con il suo File Server, e con 
il suo Spooling di stampa. Ma vediamo nel dettaglio 
quello che si può fare per ottimizzare al massimo il rendi¬ 
mento di tali macchine. Innanzitutto è conveniente mon¬ 
tare sui volumi creati sul disco rigido il System che viene 
fornito insieme con il dischetto Sunol Master; tale ele¬ 
mento potrà essere in ogni caso aggiornato e personaliz¬ 
zato con l’installazione della LaserWriter Apple e con 
raggiunta di qualsiasi Font o Desk Accessory. Utilizzan¬ 
do il Finder (qualsiasi versione abbiate), sotto il menù 
Strumenti potete disporre del comando IN1ZIALIZZA; 
tale comando non deve essere utilizzato in nessun caso 
per reinizializzare un volume del disco rigido. Nel caso in 
cui sia richiesta la cancellazione o la reinizializzazione di 
un volume bisogna usare l’applicazione Sun*Install, pre¬ 
sente sul Sunol Master, e operare come indicato nel 
manuale che accompagna la macchina. Inoltre bisogna 
fare attenzione quando si vuol copiare un intero volume 
su un altro; infatti per far ciò bisogna selezionare tutti i 
documenti presenti sul volume d’origine e trasportarli sul 
volume di destinazione: non bisogna eseguire mai le 
copie di interi volumi sovrapponendo le icone dei dischi! 
Tale comando, infatti, verrà interpretato da Macintosh 
come una copia settore per settore e non come copia 
documento per documento. L’esecuzione errata di que¬ 
ste due ultime operazioni, cioè l’uso del comando INI- 
ZIALIZZA e la copia per sovrapposizione di icone di 
volumi, porta inevitabilmente a un crash di sistema con 
conseguente perdita dei dati. Per ora non è assolutamen¬ 
te possibile condividere tra più utenti lo stesso volume; 
ciò è valido anche per volumi che contengano esclusiva- 
mente applicativi per Macintosh. Infatti molti program¬ 
mi fanno largo uso dei cosiddetti file di appoggio che 
diverrebbero così condivisi, oppure si assegnano una 
risorsa che non sarebbe resa più disponibile ad altri. 
Alcuni di questi applicativi sono: 

• Mac Write versione 4.5 che si crea i file Undo.File, 

Print.File, Scrap.File e New.file 

• Mac Paint quando si generano Hard-copy del video 

che vengono chiamati ScreenO, Screenl,... 

• MS Word che si crea in fase di stampa i file MW0000, 

MW0001,.... 

• MS Multiplan 

• MS File 

Tuttavia, come già detto, questi problemi saranno 
by-passati con l’arrivo del nuovo software di gestione 
del Sunol in rete. Un altro inconveniente che può verifi¬ 
carsi, ma non imputabile questa volta a Sunol, è che, per 
un errato uso delle varie versioni di System e Finder, 
Macintosh possa perdere la configurazione delle porte 


seriali, necessaria per collegarsi ad Apple Talk; tale in¬ 
conveniente produrrà all’atto dello startup un errore di 
sistema ID = 02. Per risolvere il problema sarà sufficien¬ 
te riconfigurare le porte seriali, e per far ciò bisogna 
spegnere il Macintosh, inserire un dischetto con qualsiasi 
applicativo che abbia il System con l’opzione Scelta 
Stampanti, accedere a tale comando sotto il menù mela, 
e ripristinare l’esatta configurazione con le seguenti scel¬ 
te: Apple Talk Collegata; Image Writer collegata sulla 
porta MODEM. 

Anche se c’è il nastro 

Per chi poi dispone dell’hard—disk completo di siste¬ 
ma di backup a nastro sembra che le cose si complichino 
di più, ma è solo un'impressione. Innanzitutto quando si 
opera il salvataggio o la ricarica da nastro è opportuno 
che lavori un solo Mac: ossia nessun altro utilizzatore 
deve essere attivo in rete. Per eseguire le operazioni 
descritte qui di seguito, bisogna usare l’applicativo Sun- 
*Safe presente sul Sunol Master. Ponete in ON lo switch 
n.2 (che si trova sotto il logo SUNOL sulla mascherina 
frontale), inserite il nastro magnetico e attendete che 
l’operazione di "Tensionamento" sia completata. Proce¬ 
dete selezionando dal menu Sun*Safe l’opzione deside¬ 
rata, tra quelle disponibili, come: 

• INIZIALIZZAZIONE qualora il nastro sia nuovo o 
da cancellare. È bene fare attenzione quando si esegue 
questa operazione, in quanto provoca la cancellazione di 
qualsiasi dato registrato precedentemente sul nastro; 
quindi è opportuno verificare di utilizzare un nastro ver¬ 
gine o che non interessa più. 

• SALVATAGGIO o RICARICA DA NASTRO, a 
seconda delle vostre specifiche esigenze. 

• VERIFICA, che permette di accertarsi che il nastro sia 
esente da difetti fisici, e che l’operazione di salvataggio 
sia andata a buon fine. 

Al termine di queste operazioni togliete il nastro, 
avendo cura di riporlo nella sua custodia di plastica anti¬ 
polvere; uscite dall’applicativo Sun*Safe, espellete il di¬ 
schetto Sunol Master e spegnete in questo ordine: Ma¬ 
cintosh, hard-disk, stampante. Da questo momento po¬ 
tete riaccendere tutta la rete, che torna a essere disponi¬ 
bile agli utilizzatori. 

Tuttavia, bisogna porre qualche cautela quando ci si 
trova a eseguire la prima configurazione dell’ 
Hard-disk Sunol con unità di backup a nastro. Tale 
configurazione viene eseguita tramite le applicazioni 
Sun*Diag e Sun*Install; ma prima di far qualsiasi opera¬ 
zione bisogna accertarsi che lo switch n.2, precedente- 
mente descritto, sia posto in OFF. Ciò eviterà ripetitive 
chiamate al nastro a ogni operazione. Terminata la confi¬ 
gurazione, secondo le vostre personali esigenze, ricorda¬ 
tevi di riabilitare l’unità a nastro ponendo lo switch n.2 in 
ON; a questo punto spegnete o riaccendete l’hard-disk, 
oppure premete il tasto di RESET posto sul retro del 
disco rigido appena sopra l’interfaccia Apple-Talk (è 
forse preferibile quest’ultima tecnica). Una curiosità: 
l’applicazione Sun*Safe per Macintosh presenta al termi¬ 
ne della inizializzazione di nuovi nastri un messaggio 
d’errore 8F, il cui significato (vedi manuale, Appendice 
B) è COMANDO NON ESEGUIBILE. Ebbene, non 
spaventatevi: ciò non pregiudica in alcun modo l’esatta 
esecuzione di inizializzazione del nastro, è solo un mes¬ 
saggio che compare dove non dovrebbe. 

Alfonso Scoppetta 
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SCUOla 

Prosegue la presentazione dei programmi del progetto ^ 3.3 
americano Seraphim. Per lo studio della chimica col computer, 2 ?V ( 
in questo numero un interessante programma su particelle e APPLE "lì 
moli che illumina sul "formidabile" numero di Avogadro. 


Particelle, 
moli e Avogadro 


E difficile affrontare qualsiasi ar¬ 
gomento di chimica senza aver 
ben chiaro il concetto di mole. Espres¬ 
sioni piuttosto frequenti come una 
mole d’acqua o una mole di elettroni, 
che ricorrono spesso nell’analisi quan¬ 
titativa dei fenomeni chimici, altri¬ 
menti risulterebbero davvero poco 
chiare. Tuttavia gli studenti spesso 
non riescono a impadronirsi del signi¬ 
ficato profondo di questo concetto, 
pur utilizzandolo meccanicamente in 
semplici calcoli stechiometrici. Analo¬ 
gamente anche il formidabile numero 
di Avogadro subisce dagli studenti lo 
stesso trattamento. 

Solo prendendo coscienza del nu¬ 
mero di particelle contenute in una 
mole di qualsiasi sostanza ci si può 
rendere conto delle dimensioni infini¬ 
tesime del mondo atomico e quindi 


comprendere la profonda differenza 
che esiste tra frasi lessicalmente simili, 
come per esempio peso di una moleco¬ 
la e peso molecolare. 

Lo sforzo dei professori di inculcare 
nelle menti degli studenti di chimica 
l’idea della grandezza del numero di 
Avogadro è quasi disperato. Con il 
computer, un po’ di fantasia e il se¬ 
guente programma l’impresa dovreb¬ 
be risultare meno ardua. 

Il programma, che fa parte di un 
secondo pacchetto del progetto Sera¬ 
phim, non richiede il vostro interven¬ 
to: dovete limitarvi a osservare come il 
calcolatore simula la costruzione di 
una ipotetica pila di carta, costituita da 
un numero di fogli esattamente uguale 
al numero di particelle contenute in 
una mole. 

Vedrete crescere la pila di carta fino 


a raggiungere le nuvole, uscire dall’at¬ 
mosfera terrestre, oltrepassare la Lu¬ 
na, Marte, Saturno e arrivare fino a 
Plutone. A questo punto il program¬ 
ma vi informerà che occorrerebbero 
ben 6 milioni di questi ponti di carta 
dalla Terra a Plutone per ottenere un 
numero di fogli pari al numero di Avo¬ 
gadro. 

Il listato 

Sebbene il programma sia privo di 
commenti interni, la sua struttura 
semplice e lineare ne consente una fa¬ 
cile lettura. 

Inoltre la ripetitività delle routine 
che disegnano i vari quadri riducono 
notevolmente il tempo necessario alla 
sua comprensione. 



(NUMERO FOGLI) 
1 

1 *14200 


(ALTEZZA APPR.) 
0.007 CM 
10.299 M 



(NUMERO FOGLI) <ALTEZZA APPR.) 


1.81000512E+16 1.30592E+Q9 KM 


Due momenti della crescita della pila di fogli: a sinistra la pila parte dal giadino di casa, a destra ha già raggiunto 
il pianeta Saturno. 
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Listato 


! TEXT : HOME 

2 VTAB 4: PRINT TAB( 12):'L A MOLE" 

3 VTAB 10: PRINT TAB< 9);’BY: KEVIN VANDERUATER" 

4 VTAB 12; PRINT TAB( 5):'D0WNERS GROVE SOUTH HIGH SCHOO 

L" 

5 VTAB 14: PRINT TAB< 11)j'SCIENCE DEPARTMENT' 

4 VTAB li: PRINT TABI 11 li"COPYRIGHT (0 1981' 

7 FOR Y = 1 TO 1999: NEXT Y 

9 D = 100 

10 HOME : HGR : VTAB 21: PRINT TAB( 12):' L A MOLE 

a 

20 HCOLOR= 4 
30 HPLOT 0,0 
40 CALL 42454 
50 HCOLOR= 1 
40 FOR X = 80 TO 159 
70 HPLOT 0,X TO 279.X 
80 NEXT X 
90 HCOLOR= 5 

100 FOR X = 30 TO 0 STEP - 1 


110 

Y = SOR ( SIN (X / 30)) * 25 


120 

HPLOT ABS 

(X - 30),0 TO ABS (X - 

30) ,Y 

130 

NEXT X 



140 

HCOLOR= 2 



150 

FOR X = 80 

TO 120 


140 

HPLOT 20.X 

TO 90,X 


170 

NEXT X 



180 

HCOLOR= 4 



190 

FOR X = 50 

TO 79 


200 

HPLOT 14 + 

(80 - X),X TO 14 + X,X 


210 

NEXT X 



220 

HC0LOR= 0 



230 

FOR X = 90 

TO 120 


240 

HPLOT 40,X 

TO 80,X 


250 

NEXT X 



240 

FOR X = 90 

TO 110 


270 

HPLOT 30 ,X 

TO 50,X 


280 

NEXT X 



290 

HOME : VTAB 21 


300 

SPEED= 50 



310 

PRINT 'IN 1 

3UESTO PROGRAMMA METTERÒ' 

FOGLI DI 


L'UNO SULL'ALTRO FINO A CHE' 

320 PRINT 'LA PILA COSI' FORMATA CONTERRÀ' 1 MOLE 

DI FOGLI.': 

330 SPEED= 255 

340 FOR X = 1 TO 2000: NEXT X 

350 HOME : VTAB 22 

340 PRINT 'ECCO CHE SI COMINCIA ! ! ! * 

370 FOR X = 1 TO 2000: NEXT X 
380 HOME : VTAB 21 

390 PRINT '(NUMERO DI FOGLI) (ALTEZZA APPR.)' 

400 POKE 34,22 

410 SHEETS = 1400 

420 Z = 121 

430 HCOLOR= 3 

440 HPLOT 200,Z TO 220, Z 

450 PRINT ' 1 0.007 CM' 

440 FOR X = 1 TO 2000: NEXT X 
470 HOME 

480 PRINT ' 350 2.5 CM' 

490 FOR X = 1 TO 2000: NEXT X 
500 Z - Z - 2 

510 FOR X = 1 TO 119 STEP 2 
520 HPLOT 200 - (Z ( 80),Z TO 220,Z 
530 SHEETS = SHEETS ♦ 350 * 8 
540 Z = Z - 2 

550 NUMBER = (SHEETS / 350) / 12 

540 NUMBER = ( INT (NUMBER * 100)) / 100 

570 HOME 

580 PRINT TA8( 5) ;SHEETS: TAB( 27)iNUMBER * 0.3:' METRI' 

590 FOR Y = 1 TO D: NEXT Y 

400 IF Z = 79 THEN HCOLOR= 7 

410 NEXT X: FOR X = 1 TO 3000: NEXT X 

420 TEXT : HOME : HGR 

430 VTAB 21: PRINT TA8( 9):'...ED E' SOLO L'INIZIO ...' 
450 HCOLOR= 4 
440 HPLOT 0,0 
470 CALL 42454 


480 HCOLOR= 5 

490 FOR X = 30 TO 0 STEP - 1 
700 Y = SOR ( SIN (X / 30)) * 25 

710 HPLOT ABS <X - 30),0 TO ABS <X - 30),Y 
720 NEXT X 

730 HCOLOR= 7 
740 FOR Z = 0 TO 1 

711 Y FÓR 3 X = 40 + <Z * 50) TO 100 + (Z * 50) 

770 0(1)= - 1 :C<2) = -1:C<3)= - 1:C<4) = - 1:C(5) = 
0:C(4) = 0:0(7) = 1:C<8) = 1:C(9) = 1:C(10) = 1 
780 U = INT ( RND (1) * 7 ♦ I) 

790 IF X < Z * 50 + 70 THEN U = U + 3 
800 Y = Y + C(U) 

810 IF Y = 0 THEN 850 
820 IF Y ) 30 THEN Y = 30 

830 HPLOT X.< 120 - (Z * 80)) - Y TO X.U20 - (Z * 80)) ♦ 

Y 

840 NEXT X 
850 NEXT Z 
840 SHEETS = 22174000 
870 HOME : VTAB 21 

880 PRINT '(NUMERO DI FOGLI) (ALTEZZA APPR.)' 

890 POKE 34,22 

900 FOR Z = 159 TO 1 STEP - 2 
910 HPLOT 199,Z TO 220.Z 
920 SHEETS = SHEETS * 22174000 » 2.5 
930 NUMBER = (SHEETS / 22174000) 

940 NUMBER = ( INT (NUMBER « 100)) / 100 
950 HOME 

940 PRINT TAB( 4);SHEETS; TAB< 27);NUMBER » 1.4;' KM' 

970 FOR Y = 1 TO D: NEXT Y 
980 NEXT Z 

990 FOR X = 1 TO 3000: NEXT X 
1000 TEXT : HOME : HGR 

1010 VTAB 21: PRINT 'ABBIAMO LASCIATO L'ATMOSFERA TERREST 
RE..' 

1020 VTAB 23: PRINT TAB( 1)..E ABBIAMO FATTO SOLO UNA 
PICCOLISSIMA FRAZIONE DEL NOSTRO COMPITO!!!'; 

1030 HCOLOR= 3 
1040 FOR Z = 1 TO 300 
1050 X = RND (1) * 280 
1040 Y = RND (1) * 140 
1070 HPLOT X,Y 
1080 NEXT Z 

1090 FOR Y = - 28 TO 28 
1100 X = SOR (784.1 - Y ‘ 2) 

1110 HPLOT 77 - X,83 + Y TO 77 * X,83 ♦ Y 

1120 NEXT Y 

1130 FOR X = 1 TO 8 

1140 READ C(X) 

1150 NEXT X 

1140 DATA 0,1024,2048,3072,4094,5120,4144,7148 

1170 FOR X = 0 TO 5 

1180 FOR Y = 1 TO 8 

1190 READ C 

1200 POKE 15534 + X.O 

1210 POKE 8494 + X + C<Y),C 

1220 NEXTY.X 

1230 DATA 0,0,0,0,0,0,0,0 

1240 DATA 2,2,2,2.2.2,42,0 

1250 DATA 34,34,34,34,34,34,28,0 

1240 DATA 34,34,38,42.50,34,34.0 

1270 DATA 8.20.34,34,42.34.34,0 

1280 DATA 0,0,0,0,0,0,0,0 

1290 HOME : VTAB 21 

1300 PRINT '(NUMERO DI FOGLI) (ALTEZZA APPR.>' 

1310 POKE 34,22 
1320 Z = 159 

1330 FOR NUMBER = 200000 TO 279000 STEP 1000 
1340 HPLOT 199,Z TO 220.Z 
1350 SHEETS = NUMBER * 22174000 
1340 HOME 

1370 PRINT TAB( 4);SHEETS; TAB( 27)iNUMBER * 1.4:' KM' 

1380 FOR Y = 1 TO D: NEXT Y 

1390 Z = Z - 2 

1400 NEXT NUMBER 

1410 FOR X = 1 TO 3000: NEXT X 

1420 TEXT : HOME : HGR 

1430 VTAB 22: PRINT TAB( 4);'ADDIO LUNA....SALVE MARTE!! 
!': FOR I = 1 TO 500: NEXT 
1450 HCOLOR= 3 
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scuola 


1460 FOR Z = 1 TO 300 
1470 X = RND (1) * 280 
1480 Y = RND (1) * 160 
1490 HPLOT X,Y 
1500 NEXT Z 
1510 HCOLOR= 5 
1520 FOR Y = - 32 T0 32 
1530 X = SOR (1024.1 - Y * 2) 

1540 HPLOT 76 - X.83 + Y T0 77 + X.83 ♦ Y 

1550 NEXT Y 

1560 FOR X = 0 TO 6 

1570 FOR Y = 1 TO 8 

1580 READ C 

1590 POKE 15536 + X,0 

1600 POKE 8496 + X + C(Y).C 

1610 NEXT Y.X 

1620 DATA 0,0.0.0.0,0,0.0 

1630 DATA 34,54,42,42.34,34,34.0 

1640 DATA 8,20.34,34,02,34,34,0 

1650 DATA 30.34,34,30,10.18.34,0 

1660 DATA 62,8,8,8,8.8,8,0 

1665 DATA 62,2,2,62,2,2,62,0 

1670 DATA 0,0,0,0,0,0,0,0 

1680 HOME : VTAB 21 

1690 PRINT '(NUMERO DI FOGLI) (ALTEZZA APPR.)' 

1700 POKE 34,22 
1710 HCOLOR= 3:Z = 159 

1720 FOR NUMBER = 45000000 TO 52900000 STEP 100000 
1730 HPLOT 199,Z TO 220.2 
1740 SHEETS = NUMBER * 22176000 
1750 HOME 

1760 PRINT TABI 4>;SHEETS; TABI 26);NUMBER * 1.6;' KM'; 

1770 FOR Y = 1 TO D: NEXT Y 

1780 Z = Z - 2 

1790 NEXT NUMBER 

1800 FOR X = 1 TO 3000: NEXT X 

1810 TEXT : HOME : HGR 

1820 VTAB 21: PRINT TAB( 8)..CHI ARRIVA ORA? .SATU 

RND'!!" 

1830 VTAB 23: PRINT ' STIAMO PER ARRIVARE LA'!!!! 

SOLO UN SESSANTAMILIONES1MO FATTO 1 !' 

1850 HCOLOR= 3 

1860 FOR Z = 1 TO 300 

1870 X = RND (1) * 280 

1880 Y = RND (1) * 160 

1890 HPLOT X.Y 

1900 NEXT Z 

1910 HCOLOR= 3 

1920 FOR Y = - 10 TO 6 

1930 X = SOR (100.1 - Y ‘ 2) * 7 

1940 HPLOT 76 - X,83 + Y TO 77 + X.83 t Y 

1950 NEXT Y 

1960 HCOLOR= 0 

1970 FOR Y = - 8 TO 8 

1980 X = SOR (64.1 - Y * 2) * 7 

1990 HPLOT 76 - X.83 + Y TO 77 + X,83 ♦ Y 

2000 NEXT Y 

2010 HC0LQR= 6 

2020 FOR Y = - 40 TO 40 

2030 X = SOR (1600.1 - Y * 2) 

2040 HPLOT 76 - X,83 + Y TO 77 + X,B3 ♦ Y 

2050 NEXT Y 

2060 HCOLOR= 3 

2070 FOR Y = 7 TO IO 

2080 X = SOR (100.1 - Y * 2) * 7 

2090 HPLOT 76 - X,83 + Y TO 77 + X,83 + Y 

2100 NEXT Y 

2110 FOR X = 0 TO 8 

2120 FOR Y = 1 TO 8 

2130 READ C 

2140 POKE 15535 + X,0 

2150 POKE 8495 + X 4 C(Y) ,C 

2160 NEXT Y.X 

2170 DATA 0,0,0,0,0,0,0,0 

2180 DATA 28,34,2,28,32,34,28,0 

2190 DATA 8,20,34,34,62,34,34,0 

2200 DATA 62,8,8.8,8,8,8,0 

2210 DATA 34,34.34,34,34,34,28,0 

2220 DATA 30,34,34,30,10,18,34,0 

2230 DATA 34.34.38,42,50,34.34,0 

2235 DATA 28,34.34,34,34.34.28.0 

2240 DATA 0,0,0,0,0,0,0,0 


2250 HOME : VTAB 21 

2260 PRINT '(NUMERO DI FOGLI) (ALTEZZA APPR.)' 

2270 POKE 34,22 
2280 HCOLOR= 3:Z = 159 

2290 FOR NUMBER = 753200000 TO 832200000 STEP 1000000 
2300 HPLOT 199,Z TO 220,Z 
2310 SHEETS = NUMBER * 22176000 
2320 HOME 

2330 PRINT TAB( 4);SHEETS; TAB( 25);NUMBER * 1.6;' KM': 

2340 FOR Y = 1 TO D: NEXT Y 

2350 Z = Z - 2 

2360 NEXT NUMBER 

2370 FOR X = 1 TO 3000: NEXT X 

2380 TEXT : HOME : HGR 

2390 VTAB 21: PRINT TAB( 9);'...ULTIMA FERMATA..PLUTONE 

2400 VTAB 23: PRINT ‘ABBIAMO FINO AD ORA 1.84 E+16 FOGLI' 

2410 POKE 2039,173 

Iti f TO 300 

2440 X = RND (1) * 280 
2450 Y = RND (1) * 160 
2460 HPLOT X.Y 
2470 NEXT Z 

2480 FOR Y = - 35 TO 35 
2490 X = SOR (1225.1 - Y ‘ 2) 

2500 HPLOT 80 - X,83 + Y TO 81 + X,83 ♦ Y 

2510 NEXT Y 

2520 FOR X = 0 TO 8 

2530 FOR Y = 1 TO 8 

2540 READ C 

2550 POKE 15536 + X.O 

2560 POKE 8495 + X + C<Y),C 

2570 NEXT Y,X 

2580 DATA 0.0.0,0,0.0,0,0 

2590 DATA 30,34,34,30,2,2.2,0 

2600 DATA 2.2,2,2,2,2,62,0 

2610 DATA 34,34,34,34,34,34,28,0 

2620 DATA 62,8.8,8,8.8,8,0 

2630 DATA 28.34,34,34,34,34,28,0 

2632 DATA 34,34.38.42,50,34.34,0 

2635 DATA 62,2,2.62,2 2,62,0 

2640 DATA 0,0.0,0,0,0 0,0 

2650 HOME : VTAB 21 

2660 PRINT ‘(NUMBERO DI FOGLI) (ALTEZZA APPR.)' 

2670 POKE 34,22 
2680 HCOLOR= 3:Z = 159 

2690 FOR NUMBER = 3177000000 TO 3577000000 STEP 10000000 
2700 HPLOT 199,Z TO 220,Z 
2710 SHEETS = NUMBER * 22176000 
2720 HOME 

2730 PRINT TAB( 4);SHEETS; TAB( 26);NUMBER0 » 1.6;' KM' 

2740 FOR Y = 1 TO D: NEXT Y 

2750 1 = 1 -2 

2760 NEXT NUMBER 

2770 FOR X = 1 TO 3000: NEXT X 

2780 TEXT : HOME : HGR : HCOLOR= 3 

2790 VTAB 21: PRINT 'TERRA-(PONTE DI CARTA)-PLUT 

ONE' 

2800 FOR Z = 1 TO 300 
2810 X = RND (1) * 280 
2820 Y = RND (1) * 160 
2830 HPLOT X,Y 
2840 NEXT Z 
2850 FOR Y = - 5 TO 5 
2860 X = SOR (25.1 - Y ‘ 2) 

2870 HPLOT 20 - X,B0 + Y TO 20 + X.80 + Y 

2880 HPLOT 260 - X,80 + Y TO 260 + X.80 » Y 

2890 NEXT Y 

2900 FOR X = 31 TO 249 

2910 HPLOT X,77 TO X,83 

2920 NEXT X 

2930 POKE 34,22 

2940 SPEED= 50 

2950 PRINT : PRINT 'ORA.PER AVERE UNA MOLE DI FOGLI DI CA 
RTACI OCCORRONO 6 MILIONI DI QUESTI PONTI’ 

2955 FOR I = 1 TO 2500: NEXT 
2960 SPEED= 255 
2970 POKE 2039,161 
2980 END 
2985 END 


■ 
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10—290 viene disegnato il primo qua¬ 
dro, la casetta con il prato, da dove 
inizia a crescere la pila di carta. Con un 
ciclo di FOR—NEXT nelle linee 
420-610 Viene costruita la pila, un 
altro ciclo più interno provvede ad ag¬ 
giornare continuamente l'altezza della 
pila e il numero dei fogli. 

620-980 Secondo quadro. La pila ha 
di gran lunga superato il tetto della 
casa e si trova tra le nuvole, create da 
una generazione casuale alle linee 
740-850, mentre naturalmente la pila 
continua a crescere con il solito proce¬ 
dimento. 

Quando la pila di carta esce dall’at¬ 
mosfera terrestre il programma si svi¬ 
luppa in altri quattro quadri, uno per 
ogni corpo celeste incontrato dalla pila 
durante la sua crescita: Luna, Marte, 
Saturno e Plutone. Le variazioni da un 
quadro all’altro sono davvero minime 
e dipendono esclusivamente dalle ca¬ 
ratteristiche del corpo, quindi di segui¬ 
to verrà esaminata solo la prima di 
queste situazioni. 

1040—1080 Disegnano il cielo stellato. 
1090—1120 Disegnano la Luna. 
1130—1280 Scrivono sul disegno la pa¬ 
rola LUNA. 

Giuseppe Innorta 


L’importante è l’esperienza 

Come ottenere il massimo dal computer in campo didattico e 
sperimentale? Innanzitutto andando a vedere le più avanzate esperienze 
realizzate nelle migliori università, che valgono piu di ogni teoria. 

Partendo da questo assunto la Apple Computer spa, con la 
collaborazione dell'Università di Pisa, ha promosso e organizzato un 
incontro internazionale che sarà più di un congresso: le esperienze 
concrete ne saranno infatti protagoniste. Mind & Byte, questo il nome 
dell'incontro, darà modo di vedere a quali eccezionali risultati nel campo 
della didattica e della ricerca possano portare la tecnologia avanzata del 
personal computer e la appassionata competenza degli esperti pedagogisti 
coniugate insieme. Lo slogan dell'incontro è: "un computer per pensare, 
un maestro per imparare”. 

Il primo giorno, 5 dicembre, verranno presentate e discusse le attività 
dell'Apple University Consortium (AUC), associazione di ricerca di cui 
fanno parte, tra le altre, università prestigiose quali quelle di Boston, 
Stanford, Princeton, Cambridge, Lienz, Lund, Saragozza e, la prima ad 
aver aderito in Italia, Padova. Seguirà una tavola rotonda con esperti delle 
più importanti università italiane. 

Il secondo giorno, 6 dicembre, saranno in primo piano le esperienze di 
ricerca sulla didattica e il calcolatore nella scuola secondaria e 
dellobbligo, a partire dal caso delle primary schools del distretto di 
Houston, nelle quali l'uso del personal è avanzatissimo. 

Tra i nomi dei relatori spiccano quelli di Jerry Keogh, Ove Petterson, 
Pat Sturdivant e, per l'Italia, Gianni Degli Antoni, Lionello Cantoni e 
Giorgio Olimpo. La relazione introduttiva sarà tenuta da Ivan Browde 
della divisione internazionale per l'educazione della Apple Computer. 

A latere di Mind & Byte sarà possibile conoscere e provare i 
programmi dell'AUC: un privilegio, questo, che la Apple è lieta di offrire 
ai ricercatori italiani in questa eccezionale occasione. 

I lavori di Mind & Byte si terranno giovedì 5 e venerdì 6 dicembre a 
Pisa nel Palazzo dei Congressi dell'Università, in via Matteotti 1. 


dimensione prestazioni 

DIN DnTCM7A DPD I ’ADDI C APPLE II e Ile, sistemi operativi: 

KIU rU I CINZ. A Ktrt L ArrLt DOS 3.3, diversi DOS, PRODOS, CP/M 2.2 (vers. 56K), PASCAL 1.1 e 1.2 
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applicando 


Ecco un elenco dei computer shop presso i quali è possibile abbonarsi ad Applicando, 
acquistare una copia, cercare un numero arretrato... 


VALLE D'AOSTA 


Aosta: Informatique sas, Av. Conseil des 
Commis 14-Quart (AO): Informatique 2, 
Reg. America 31. 

PIEMONTE 


Alba (CN): Centro computer, Via Paruzza 2- 
Alessandria: Sistemi Bit, Via Ghilini 27- 
Asti: Gestione Dati srl, Via B, Buozzi 45- 
Biella (VC): Consul Computer srl, Via delle 
Rose 2, Informatica Biella sas, Piazza S Paolo 
1/8 Borgomanero (NO): All Computer, 
Corso Garibaldi 106-Cuneo: Thema Inform, 
Distribuita sas. Via Statuto 10 Dumodosso- 
la (NO): Nuova Elettronica, Via Giovanni 
XXIII68 Novara: D.R. srl, Vie XX Settembre 
19. D.R. srl. Via Morera 3, SPA srl, Via A. 
Canobbio 16/A Pinerolo (TO): Elaborazio¬ 
ne Dati Pinerolo, Viale Montebello 6-Torino: 
A.B.Computer sas, Corso Grosseto 209, Bei- 
lucci Benedetto, Via Papacino 23, Comintor 
Sistemi sas, Corso Telesio 4/B. Digitalsync 
snc, Corso Moncalieri 303, Dimensione Per¬ 
sonal, Via Bertela 22/e. GE.NE.CA. srl, Via XX 
Settembre 51. Hobby Elettronica, Via Saluzzo 
11/F-G-H. Omicron Computers snc, C.so 
Duca degli Abruzzi 14. Pinta G. Componenti 
elette, Corso Principe Eugenio 15 bis. Softec 
Computer srl, Via Juvarra 24. Tecnosystem 
Computer Shop, Corso Francia 12. Tekno 
Computers srl. Via Madama Cristina 31/c. 

LIGURIA 


Genova: Computer Center, Via San Vincen¬ 
zo 129 r. Sals Informatica spa, Via D'Annun¬ 
zio 2 e Vie B. Partigiane 132 r-Genova 
Sampierdarena: Computer Center sas, Via 
Storace 4r Lavagna (GE): Ratto Linea Uffi¬ 
cio, Corso Genova 100-La Spezia: Sottline 
srl, Via Piave 19 Rapallo (GE): Ratto Linea 
Ufficio snc. Via della Libertà 130-Sanremo 
(IM): A.E.S., Via Martiri della Libertà 180- 
Savona: Briano snc. Corso Tardy e Benech 
20 r Sestri Ponente (GE): All Computer 
sas, Via C. Menotti 136 r. 

LOMBARDIA 


Alme (BG): Elcod. Viale Italia 45/A Assago 
(MI): Basic Computers, Centro Commerciale 
Milanoliori-Bergamo: Il mondo dell’infor¬ 
matica. Via Pitentino 8. Studio 15 srl, Via 
Quarenghi 60 -Brescia: Alfa computer. Via 
Bassi 26. Brescia Computers srl, Via Malta 
12. Il Computer srl, Via Solferino 5. Personal 
Data, Via Brozzoni 4 Como: Accaesse Infor¬ 
matica srl, Via Acquanera 46. D.S.I. srl, Via 
Dottesio 8. Irpe Informatica srl, Via Cadorna 
1/a-Cremona: Archimede, Via Palestra 
11 B Gallarate (VA): Irpe Computer srl. Via 
Pegoraro 8 Gavardo (BS): Bit Shop, Via G. 
Quarena 120-Lecco (CO): Computers Lecco 
snc, Via Nino Bixio 18/B. Datamation, Viale 
Turati 40 Lissone (MI): Computerlandia, 
Via Martin Libertà 72-Mantova: Antek 
Computer sas, Via Cavour 69 Melegnano 
(MI): L'Amico del Computer. Via Castellini 
25 Milano: A.G.Informatica srl. Via G.Silva 
49. All’Informatica Shop, Via Lazzaretto 2. 
All'Informatica srl, Via Vigevano 8. Commu¬ 
nications Engineering, Piazza Firenze 4. Del- 
tron srl, Viale Gran Sasso 50. Esprit, Via 
Bergamini 13 Happy System, Piazza Diaz 6. 
Il Tempio del Computer, Via Pattari 2. Indico 
seri. Via Marco d’Agrate 1. Indico seri, Via 
Pier Capponi 12. Information Technology, 
Via dei Bossi 7 ang. Via Broletto. La Bottega 
Informatica srl, Va Turati 6. Macan sas, Via 
Broletto 39. Microtech Sistemi, Viale Piave 7. 
Polisistemi, Via Derna 19. SH Computers srl, 
Viale Montenero 33. Small Business Compu¬ 


ters, Via Vitruvio 38. Softec Computer, Viale 
E. Jenner 23-Monza (MI): ESI srl, Via Ca¬ 
vallotti 11. Nikom Electronics, Via Asiago 7- 
Pa»ia: M.A.S.H Computer Systems, Via 
della Rocchetta 5. Senna Gianfranco snc, Via 
Calchi 5 S.Antonio Mantovano (MN): 
Antek Computer sas, Via Manzoni 49-Trez- 
zano sul Naviglio (MI): Personal computer 
shop, Via L.da Vinci 36-Varese: IRPE srl, 
Via Carantani 1 Villasanta (MI): Computer 
Area show room, Via Carducci 2. Computer 
Area snc, Via Volta 27/a. 

TRENTINO 


Trento: SI.GE. sas, Via Piave 28 

FRIULI-VENEZIA GIULIA 

Gorizia: Elcom. C.so Italia 149 Pordeno- 
ne: Electronic Center snc, Viale Libertà 79 
Electronic Center, Viale Martelli 17-Trieste: 
Computermarket, Via Valdirivo 6-Turriaco 
(GO): Tecno Power Elettronica, Via Marconi 
19 Udine: BIT Computers, Via Pozzuolo 
107. PS Elettronica sas, Via Tavagnacco 
89/91 C.C. 

VENETO 


Bassano del Grappa (VI): A Tre snc, Piaz¬ 
za Firenze 23-Conegliano (TV): Computing 
Program, Via G. Piovesana 32-Creazzo (VI): 
Uomo Computer, Via Olmo 38-Mestre 
(VE): Pacinotti sas, Via Torino 92 Mirano 
(VE): Saving Elettronica, Via Gramsci 40- 
Montebelluna (TV): Uomo Computer. 
C.so Mazzini 53 Montecchio Magg.(VI): 
Effecomp (Esa), Piazza Carli 2 Padova: Ca¬ 
povilla & C. sas, Galleria Scrovegni 5. Com¬ 
puter Service srl, Via Beethoven 3. E D P 
Sistemi srl, Via Borromeo 13-Rovigo: Com¬ 
puter Service sas, Via Cavallotti 12 Treviso: 
A5 Computers srl, Borgo Cavour 37/A-Ve- 
nezia: Personal Computer, Cannaregio 
5894-Verona: ARMU srl, Via Teatro Filar¬ 
monico 3 Chip Computer (Esa), Stradone 
S Fermo 8 Esacomp srl. Via Roveggia 43 
MOS 80 sas. Via Germania 21. MOS 80 
computer shop, Via del Pontiere 2. MOS 80 
Personal Computers, Largo Marzabotto 21- 
Vicenza: Abc Informatica srl, Contrà Porta 
Padova 19. Abc Informatica srl, Viale S Laz¬ 
zaro 19. Sevi sas. Via S. Agostino 87-Villa- 
franca (VR): Studio 4, Corso V. Emanuele 
65. 

EMILIA ROMAGNA 


Bologna: CEDA Minicomp srl, Piazza Aldro- 
vandi 2/2. Computer Systems, Via Ercolani 
10/d. EDP Sistemi BO srl, Viale Pietramellara 
61/F. Lucky Systems, Via Farini 33/a. Ser¬ 
rano. Via B. da Carpi 9 B Carpi (MO): Irei 
Carpi, Vìa Berengario 58-Cesena (FO): SHC 
snc, Via Pisa 40/42-Ferrara: Mazzacurati 
Claudio, Viale Cavour 186/188. Soc. Termo¬ 
meccanica, Via Tito Speri 5. Tecnomeccani¬ 
ca, Via Garibaldi 195-Fidenza (PR): Archi- 
mede, Via Vito Aimi 2. RCM Computer, Via 
Cornini Malpeli 11 Fiorenzuola d’Arda 
(PC): Centro Computer, Corso Garibaldi 
125/A-Forlì: A-Z Computer srl, Via Cignani 
7. Icot Impianti srl, Vìa Masetti 56. Kronos, 
Via Oreste Regnoli 30 Modena: Canalgran¬ 
de Informatica, Corso Canalgrande 14. Iret 
spa, Corso Canalgrande 29. Masetti Elettro¬ 
nica srl, Via Emilia Centro 211 Parma: 
Computek sas, Piazzale Boito 5. Iret spa, Via 
Cavallotti 3. RCM Computer, Via Farini 51a- 
Piacenza: PC-Personal Computer, Via 
Chiapponi 42. RCM Computer, C.so Vittorio 
Emanuele 96-Reggio Emilia: Computer 
Center srl, Via D. Alighieri 4. Esaprogetli, Via 


F. Filzi 2. Iret spa, Via Emilia S. Stelano 32- 
Rimini: Computer Line, Via Coletti 61 -Sas¬ 
suolo (MO): Iret Sassuolo, Via Pretorio 65- 
Scandiano (RE): Informatica System, Via 
Statale 13/A Viserba di Rimini (FO): Com¬ 
puter Center. Via Pallotta 25/A. 

TOSCANA 


Arezzo: Sisted srl, Via L. Galvani 22. Sisted 
srl, Piazza Risorgimento 10-Borgn a Bug- 
giano(PT): CO-DI snc, Via 24 Maggio 119- 
Firenze: Anfrel Informatica sas, Via Masac¬ 
cio 50 e Viale Gramsci 10/R. Centro Servizi 
srl, Via P. Petrocchi 24 Computer Line srl, 
Viale Spartaco Lavagnini 20. Elettronica Cen¬ 
to Stelle srl, Via Cento Stelle 5/B. Line spa, 
Via G. Di Vittorio 10 Paoletti Ferrerò. Via il 
Prato 40/42r P.T.E. snc, Via Duccio da Buo- 
ninsegna 60. Soluzioni EDP srl, Corso dei 
Tintori 39r Tuttocomputer (C.serv.), Via Pan- 
zani 36 38r Forte dei Marmi (LU): Blu 
Cala. Via Morin 95 Grosseto: C ISI D 
Computer snc, Via Papa Giovanni XXIII 4- 
Livornn: Livinform 2, Scali delle Cantine 62 
Livinform srl. Via Roma 8 (P.za Attias)- 
Massa: Euro Computer sas, Piazza C. Berta- 
gninì 4 Montecatini: CO-DI snc. Via I 
Maggio 20/22 Fraz. Margine Coperta-Perl- 
gnano (PI): Memor Informatica srl. Via To¬ 
gliatti 2-4 B-Piombino (LI): Centro Ufficio 
sdt, Via F. Ferrer 37/39-Pisa: Data Port due. 
Via Sancasciani 35. Società Elettronica Tirre¬ 
na, Via Fucini 20-Pistoia: Inter Systems, Via 
Pietro Mascagni 14-Pontedera (PI): Data 
Port srl, Via Brigate Partigiane 27-S. Gio¬ 
vanni Valdarno (AR): ICS srl Via Gari¬ 
baldi 46. 

UMBRIA 


Cerbara di città (PG): Computer Post, Via 
Madonna del Vento-Foligno (PG): Linea in¬ 
formatica snc, Via Garibaldi 81 -Perugia: 
Icot Impianti, Via Cicloni 8-Ponte S.Gio- 
vanni (PG): Ready Computer srl, Via Adriati¬ 
ca 49 

LAZIO 


Latina: Easy Byte, Viale XVIII Dicembre 44- 
Lido di Ostia (Roma): A. C S-Advanced 
Computer System. Via S. Consacchi 10. Co¬ 
smèe srl, Via delle Gondole 168/170-Ostia 
(Roma): AG Computer Systems srl, Via A. 
Carabelli 108/1 12-Roma: AG Computer Sy¬ 
stems srl, Via G.Lanza 101/103/105 Biotech 
srl, Via S. Valentino 18. Bit Computers 2, 
Viale Ionio 333/335. Bit Computers 3, Via 
Nemorense 14/16. Bit Computers Nord. Via 
Tuscolana 350/350a. Bit Computers Star, Via 
F. Satolli 55/57/59. Compushop, Via No- 
mentana 265/273. Computer Center srl, Via 
Nizza 48/52. Computerart srl, Via Michele di 
Landò 41. Computime srl, Via Cola di Rienzo 
28. Computime srl, Viale Parioli 25. Cosmic 
srl, Via Viggiano 70. Cosmic srl, Via Vespa¬ 
siano 56/b. Easy Byte, Via Giovanni Villani 
24. E.D.P. Market, Via Somalia 205. E.M.EUR 
Micro Computer, Viale C. Pavese 267. FBM 
di Mario Bagnettì, Via Flaminia 395. S.I.- 
PR.EL. srl, Via Pompeo Magno 94-Roma 
EUR: Bit Computers, Via F. Domiziano 10- 
Viterbo : Alfa Computer, Via Palmanova 
12/C. 

MARCHE 


Ascoli Piceno: Rinascita Informatica sas, 
Corso Trento e Trieste 17 Camerino (MC): 
M.E.D., Via V. Venanzi 11/1 3-Civitanova 
Marche (MC): N.B.P, Elettronica, Via Don 
Bosco 1 1/13-Fabriano (AN): M E D., Piazza 
Rosselli 6 Jesi (AN): E.M.J. sas, Via F. Con¬ 


ti 4. New Computer srl, Via Pergotesi 271- 
Macerata: M E D . Via Mozzi 72/a-Tor- 
rette di Ancona (AN): Sìsteda spa. Via 
Flaminia 286/a. Sisteda srl, Via Velino 5. 

ABRUZZO 


Avezzano (AQ): Aspron. Via America 
10/12 Chieti: Computer Point sas, Viale 
Unità d’Italia 5-L’Aquila: S.E.A.D. srl, Via 
Giardini 16a Lanciano (CH): Electronic Mi¬ 
crosystems, Via della Pace 3 Pescara: 
O C S A. srl, Viale Marconi 361 (zona stadio). 
Ormi Computers srl, Via C. Goldoni 5-Vasto 
Marina (CH): O.C.S.A srl. S S Adriatica 


MOLISE 


Campobasso: Informatica Molisana. Via B 
Buozzi 12 

CAMPANIA 


Avellino: I C C. Elettronica srl, Via degli 
Imbimbo 126-Barano d’Ischia (NA): Mat¬ 
terà Antonio, Via Roma 61 -Benevento: Ma- 
sone Informatica, Viale dei Rettori 57-Napo- 
li: Computer Systems srl, Via Puccini 19. 
Golden Computer srl, Via Michelangelo 7. 
I.C International Computer srl, Via Nuova 
S.Rocco 62/P.co Soleado I.C International 
Computer, Via Posillipo 130. La Barbera Car¬ 
lo sas, Via Toledo 320-Salerno: Computer 
System. Via E. Bottiglieri 19. SEDA srl, Via 
Parmenide c/o lannone 

CALABRIA 


Catanzaro: Ce Sim sas. Via Carlo V 
174/180 Visicom srl, Via Minniti Ippolito 
10 Cosenza: Micro Systems sdt, Via Roma 
75-Gioia Tauro (RC): Tecnocomp snc. Via 
Nazionale SS 111/117 Reggio Calabria: 
GLM Informatica snc, Via De Nava 98-Spez- 
zano Albanese (CS): lannibelli. Via Strago- 
lia 48 

PUGLIE_ 

Bari: Auditorium 3, Piazza Massari 15 des¬ 
se spa. Via Re David 176/d. L.e L. Computers 
srl, Largo 2 Giugno 4-Brindisi: S I C. srl, 
Viale S Giovanni Bosco 109-Foggia: ISI srl. 
Via Matteotti 83-Lecce: Quasar Informatica 
srl, Via Giacomo Arditi 11-Molfetta (BA): 
Auditorium 3, Piazza Garibaldi 12/a Putì- 
gnano: Amore & Computer. Via G. Laterza 
28-Taranto: Elettrojolly Centro srl, Via De 
Cesare 13. 

BASILICATA 


Matera: Lucana Sistemi srl, Via Don Minzo- 
ni 4. 

SICILIA 


Catania: Cafici Francesco, Via Ala 57/59. 
Centro Informatica sdt, Via Firenze 211 
Computer Shop, Via E Orlando 164. SI EL 
Informatica snc, Piazza Galatea 2 Messina: 
C.E.E. srl, Via Industriale 116. Cubeta srl, Via 
Cardines 12/14. Libreria Bonanzinga, Via dei 
Mille 110-Milazzo (ME): Tectron Tecnolo¬ 
gie Elet. srl, Via dei Mille-Palermo: Compu¬ 
ter Shop (Inf.Comm ), Via Notarbartolo 
23/b/c. Informatica Commerciale spa, Via 
Notarbartolo 26-Ragusa: Sosyco, Corso 
V.Veneto 597-Trapani: Guatano Eugenio, 
Via Virgilio 11. 

SARDEGNA 


Cagliari: S I I., Via S.Lucifero 85 Sassari: 
Bajardo, V ie Italia 16. 
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Comandi utili per stampanti 

Nell’Applihelp del numero 16 di Applicando avete 
trovato l’elenco di alcuni dei comandi più usati per la 
stampante. Quell’elenco viene ora completato con co¬ 
mandi per Image Writer e DMP che, anche se non 
vengono usati continuamente, possono essere inseriti 
nei vostri programmi per creare stampe particolari. 


Pica proporzionale: 

PRINT 

CHR*<27> 

+ 

■ p. 

Elite proporzionale: 

PRINT 

CHR*<27> 

+ 

" P " 

Semi condensato <13.4 car/pol1 ice ) 

PRINT 

CHR*<27> 

+ 

" e " 

Inizio testo sottolineato: 

PRINT 

CHR*<27> 

+ 

"X" 

Termine testo sottolineato: 

PRINT 

CHR*<27> 

+ 

" Y" 

Line f eed in avant i : 

PRINT 

CHR*<27> 

+ 

"f " 

Line -feed indietro: 

PRINT 

CHR*<27> 

+ 

V 


Quest’ultimo comando può essere usato con il co¬ 
mando ESCAPE (che corrisponde a CHR$(27) ) L + "" 
che sposta il margine sinistro di "" spazi verso destra, 
per stampare dei testi su diverse colonne. 

Se avete un nastro stampante un po’ consunto dall’u¬ 
so e dovete stampare un documento ben leggibile, po¬ 
tete rinforzare la battuta della testina con il comando 
PRINT CHR$(27) + Per ritornare allo stato nor¬ 
male battete PRINT CHR$(27);CHR$(34). 

Se dovete stampare con l’Image Writer indirizzi su 
buste di misura tale che non riescano a rimanere sotto il 
tamburo, potete disattivare il rivelatore di fine carta 
con l’istruzione PRINT CHR$(27) +"0" e stampare 
ovviamente una busta alla volta. Per riattivare il senso¬ 
re battete PRINT CHR$(27) + "o". 

Ricordate che tutte le lettere tra virgolette possono 
essere sostituite dal corrispondente numero in decima¬ 
le rilevabile dalla tabella pubblicata a pag. 32 del Sup¬ 
plemento al Manuale dell'Acquirente allegato al Com¬ 
puter, e che tutti questi comandi vengono automatica- 
mente annullati allo spegnimento. 

Conversione con un solo drive 

Se possedete un solo drive potreste trovarvi in diffi¬ 
coltà nell’operazione di conversione dei file da D.O.S. 
3.3 in ProDos. Le possibilità sono due. Se avete l’Ap¬ 
ple Ile o l’Apple Ile con scheda 80 colonne ed espansio¬ 
ne di memoria, potete usare la RAM aggiuntiva come 
disco virtuale con questo procedimento: 

— Inserite nel drive il disco ProDos User’s Disk e 
accendete il computer. 

— Battete: -CONVERT 

— Dal menu di conversione battete C per cambiare il 
numero dello slot e del drive. 

— Battete <RETURN> per accettare SLOT 6. 

— Battete <RETURN> per accettare DRIVE 1. 

— Battete due volte P per cambiare il nome del disco 
ProDos. 

— Battete /RAM/ seguito da <RETURN> per accet¬ 
tare il cambiamento. 

— Battete T per trasferire i file. 

— Battete <RETURN> per avere il catalog del disco 
e segliete i file da trasferire. 

— Battete <RETURN> per eseguire il trasferimento. 
Ora i file in ProDos risiedono nella RAM della sche¬ 
da 80 colonne. Usate l’utility COPY FILE da ProDos 
User’s disk, o COPIA FILE dal disco Utility di Siste¬ 
ma, per trasferire i file in ProDos dalla RAM in un 
disco formattato in ProDos. Fate questa operazione 
prima di spegnere il computer, altrimenti il vostro lavo¬ 


ro andrà perso. 

Se avete l’Apple Ile con un solo drive, seguite la 
procedura seguente: 

- Eseguite le prime sei operazioni della situazione 
precedente. 

- Battete due volte P per cambiare il nome (PATH- 
NAME) del disco in ProDos. 

- Battete il nome del disco in ProDos e battete <RE- 
TURN> per accettare il cambiamento. 

- Battete R per cambiare la direzione di trasferimen¬ 
to. 

- Battete T per trasferire i file. 

- Battete <RETURN> per ottenere il catalog del 
disco in ProDos. 

- Battete <ESC> per annullare il trasferimento. 

- Battete R per cambiare nuovamente la direzione di 
trasferimento. 

- Battete T per trasferire i file. 

- Scegliete i file da trasferire e battete <RETURN> 
per eseguire il trasferimento. 

Terminato il caricamento del file in memoria, il com¬ 
puter vi chiederà di inserire il disco in ProDos e scriverà 
il file convertito su di esso. 

Appleworks e Scribe 

Usando la stampante Scribe con il Word Processor 
dell’AppleWorks (Tre per Te) in italiano con Apple Ile 
o Ile, si verificano alcuni inconvenienti. Per ovviare a 
essi occorre cancellare il file SEG.PR presente nel 
disco Programma, e al suo posto copiare il file SEG¬ 
.PR.I, presente nel disco STARTUP. Eseguito il tra¬ 
sferimento, il file SEG.PR.I dovrà essere chiamato 
SEG.PR, per poter essere utilizzato dall'AppleWorks. 
Si consiglia di effettuare le operazioni di trasferimento 
su copie del programma. 

Linguaggio macchina e 65C02 

Ecco le nuove istruzioni che il microprocessore 
65C02 aggiunge a quelle del cugino 6502, e l’istruzione 
di indirizzamento: 


■ Nuove istruzioni 


HEX 

MNEMONIC 

DESCRIPTION 

80 

BRA 

Branch relative always [Relative] 

3A 

DEA 

Decrement accumulator [Accum] 

1A 

INA 

Increment accumulator [Accum] 

DA 

PHX 

Push X on stack [Implied] 

5A 

PHY 

Push Y on stack [Implied] 

FA 

PLX 

Pulì X from stack [Implied] 

7A 

PLY 

Pulì Y from stack [Implied] 

9C 

STZ 

Store zero [Absolute] 

9E 

STZ 

Store zero [ABS, X] 

64 

STZ 

Store zero [Zero page] 

74 

STZ 

Store zero [ZPG,X] 

1C 

TRB 

Test and reset memory bits with accumulator [Absolute] 

14 

TRB 

Test and reset memory bits with accumulator [Zero page] 

OC 

TSB 

Test and set memory bits with accumulator [Absolute] 

04 

TSB 

Test and set memory bits with accumulator [Zero page] 


■ Modi di indirizzamento 


HEX 

MNEMONIC 

DESCRIPTION 

72 

ADC 

Add memory to accumulator with carry [(ZPG) ] 

32 

AND 

"AND" memory with accumulator [(ZPG)] 

3C 

BIT 

Test memory bits with accumulator [ABS, X] 

34 

BIT 

Test memory bits with accumulator [ZPG, X] 

D2 

CMP 

Compare memory and accumulator [(ZPG)] 

52 

EOR 

"Exclusive Or" memory with accumulator [(ZPG)] 

7C 

JMP 

Jump (New addressing mode) [ABS(IND,XJ] 

B2 

LDA 

Load accumulator with memory [(ZPG)] 

12 

ORA 

"OR" memory with accumulator [(ZPG)] 

F2 

SBC 

Subtract memory from accumulator with borrow [(ZPG)] 

92 

STA 

Store accumulator in memory [(ZPG)] 
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E' proprio 
un regalo 

Perché chiedete 18.000 li¬ 
re per "Le Pagine del Soft¬ 
ware e dell’Hardware"? Si 
tratta non di un libro di testo 
ma di un catalogo di prodot¬ 
ti in vendita, perciò è mate¬ 
riale pubblicitario. Ignorate 
forse che organizzazioni di 
vendita di non poco peso co¬ 
me Vestro e Postai Market 
fanno pagare il loro ricchis¬ 
simo, illustratissimo e volu¬ 
minosissimo catalogo poche 
centinaia di lire che oltre 
tutto vengono rimborsate al 
primo acquisto? Per com¬ 
pletare l'opera chiedete 
10.000 lire in più sull'abbo¬ 
namento e affermate che il 
catalogo è in omaggio o ad¬ 
dirittura altrove dite in rega¬ 
lo. Ma che regalo è se lo si 
paga 10.000 lire? 

Franco Braga 

Treviglio (BG) 

Una differenza tra gli altri 
e il nostro "catalogo" del soft¬ 
ware e dell'hardware c’è, ed 
è fondamentale: Postai Mar¬ 
ket, Vestro ecc. vendono di¬ 
rettamente i prodotti illustra¬ 
ti sui loro cataloghi, noi no. 
Si tratta infatti di quasi 2.000 
prodotti tra hardware e soft¬ 
ware, che vengono venduti 
da società produttrici che 
nulla hanno a che fare con 
noi. Non solo, ma la raccolta 
di tutti i dati contenuti nelle 
"Pagine del Software e del- 
PHardware" è un impegnati¬ 
vo lavoro redazionale, per il 
quale ben due persone della 
nostra casa editrice lavorano 
a tempo pieno. Quello che 
possiamo fare è solo di con¬ 
tenere al massimo il prezzo: 
un volume di 320 pagine oggi 
in libreria non costa meno di 
25.000 lire; se il nostro costa 
appena 18.000 è perché parte 
dei costi sono pagati dagli in¬ 
troiti pubblicitari. Infatti le 
descrizioni di software e 
hardware sono assolutamen¬ 
te gratuite: facciamo pagare 
solo la pubblicità vera e pro¬ 
pria. Quanto al fatto di "far 
pagare" 10.000 lire le "Pagine 
del Software e dell"Hardwa¬ 
re" è consuetudine di tutte le 


riviste offrire ai propri lettori 
due tipi di abbonamento: a) 
a prezzo scontato e senza do¬ 
no; b) a prezzo pieno e con 
un dono di tipo diverso. Noi 
abbiamo pensato che chi usa 
l'Apple e quindi legge Appli¬ 
cando, è anche interessato 
alle "Pagine del Software e 
dell'Hardware" e che quindi 
gli faccia piacere riceverle 
con il proprio abbonamento, 
pagando quest'ultimo a 
prezzo pieno. 

Stampa 
132 colonne 

Nuovo lettore della vostra 
rivista, vorrei porvi alcuni 
piccoli quesiti circa l'Apple 
Ile e la stampante Image 
Writer 132 colonne. Con la 
stampante non sono ancora 
riuscito a ottenere una stam¬ 
pa su 132 colonne: il manua¬ 
le, che si riferisce sempre al 
modello a 80 colonne, non 
menziona alcun comando 
speciale a riguardo. Deside¬ 
rerei avere anche informa¬ 
zioni circa un uso corretto 
del DipSwitch 1—5 (ricogni¬ 
zione dell’ottavo bit di dati), 
che se posizionato su Open 
rende la stampante incapace 
di ricevere comandi dal 
computer. 

Adriano Scandellari 

Ponte San Nicolò (PD) 

Non esistono sostanziali 
differenze tra i comandi da 
impartire alt'Image 80 co¬ 
lonne e quelli da impartire 
all Image 132 colonne. Ov¬ 
viamente cambiano solo i co¬ 
mandi per quanto riguarda il 
numero di caratteri per linea. 
Le elenchiamo a parte carat¬ 
teristiche e caratteri per le 
due stampanti: 


Naturalmente quando dà 
il comando caratteri per li¬ 
nea deve sostituire a XXX il 
numero di caratteri per linea 
che vuole stampare. 

Per quanto concerne il 
DIP—Switch 1—5 si è già ri¬ 
sposto da solo: se tale switch 
non si trova in posizione 
CLOSED la stampante non 
può ricevere alcun coman¬ 
do. 

Tenga presente che l'Ap¬ 
ple Ile all’accensione setta la 
porta seriale della stampante 
su 80 col., quindi per stam¬ 
pare 132 col. occorre impar¬ 
tire il comando su indicato. 

Accesso 
ai settori 

Uso un Apple Ile e vorrei 
avere maggiori notizie sul 
ProDOS e in particolare sul¬ 
l’indirizzo del sottopro¬ 
gramma di accesso ai settori 
(RWTS) e su come si usa. 
Desidererei anche sapere in 
che numero di traccia e di 
settori si trova il catalog. 
Inoltre, avendo il Ile come 
microprocessore il 65C02, 
vorrei avere un elenco delle 
nuove istruzioni rispetto al 
6502 e le loro spiegazioni. 

Fabio Piccioni 

Torino 

Il Catalog ProDos comin¬ 
cia in Traccia 0 Settore B (se 
si usa Inspector o simili), op¬ 
pure in Blocco 2 (se si usa il 
DiskEdit in ProDos). Tutta¬ 
via per avere informazioni 
tecniche più dettagliate sulle 
routine del ProDOS le consi¬ 
gliamo di consultare il Pro- 
DOS Technical Reference 
Manual acquistabile presso 
un qualsiasi Rivenditore au¬ 
torizzato Apple. Per quanto 


riguarda invece il set delle 
nuove istruzioni per il 65C02 
la rimandiamo alla rubrica 
Applihelp di questo stesso 
numero. 

Destra 
e sinistra 

Sono abbonato ad Appli¬ 
cando e talmente soddisfat¬ 
to del mio Apple //c da aver 
comperato anche un Apple 
//e per l'ufficio, utile soprat¬ 
tutto perché a esso posso 
collegare il profile. Ho però 
dei problemi di stampa uti¬ 
lizzando il programma Ap¬ 
ple Works in quanto, avendo 
impostato la larghezza della 
carta con il valore massimo 
riportato sul manuale (13,2 
pollici), la stampa non viene 
bene e cioè sembra che il te¬ 
sto venga stampato spostato 
a destra, e che la parte ecce¬ 
dente sulla destra venga 
stampata a sinistra. Cosa è 
successo? 

Emilio F. Falco 

Manziana (RM) 

Per il problema di stampa, 
non si preoccupi, non vi è 
nessun guasto; il problema 
consiste nel fatto che lei ha 
scelto un valore di larghezza 
di stampa (13,2 pollici) sen¬ 
za aver dopo scelto il caratte¬ 
re compresso (PI o P2) rela¬ 
tivo a tale larghezza. Infatti il 
carattere standard ( 10 carat¬ 
teri per pollice) è relativo alla 
larghezza utile delta carta (8 
pollici) e quindi si hanno 80 
caratteri per linea; selezio¬ 
nando 13,2 come larghezza 
della carta bisognerà selezio¬ 
nare il carattere compresso 
per ottenere, ovviamente in 
compresso, 132 caratteri per 
linea. 


Stampa grafica 

Sono uno studente di 17 
anni, posseggo un Apple Ile 
e vorrei sapere come ottene¬ 
re l'hard copy del video, sia 
in grafica che in modo testo, 
con la stampante Scribe. Il 
manuale in mio possesso è 
molto povero di esempi in 
grafica, e non tratta affatto 


COMANDI PER IMAGE 

80 

COLONNE 

132 

COLONNE 

Carattere standard 

80 

cara t teri 

132 

caratteri 

Carattere compresso 

132 

carat teri 

255 

carat teri 



per linea 


per linea 

Comando carattere 





compresso (uguale 





per entrambe) 

PRINT CHR* (27) 

+ 

CHR* (81) 

Comando carattere 





per linea (uguale 





per entrambe) 

PRINT CHR* (?) 

"XXXN" 
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l’argomento dell'hard copy. 
In ogni caso, è possibile tra¬ 
sferire nei miei programmi 
qualche routine del pro¬ 
gramma Mouse Paint, sia 
per questo che per altri sco¬ 
pi? Nella directory del Mou- 
sePaint c’è una routine chia¬ 
mata Printdriver. Può servi¬ 
re? Dove posso trovare de¬ 
scrizioni dettagliate delle 
routine dell’Applesoft e dei 
sistemi operativi (Dos 3.3 e 
ProDos)? 

Fabio Mannino 

Messina 

Per quanto riguarda i suoi 
problemi circa la grafica in 
doppia risoluzione, le consi¬ 
gliamo di leggere la serie di 
articoli dedicati a questo pro¬ 
blema a partire dal n. 19 di 
Applicando; invece per ciò 
che concerne informazioni 
più dettagliate sui due sistemi 
operativi DOS 3.3 e Pro- 
DOS la rimandiamo ai rela¬ 
tivi manuali (Dos 3.3, Pro- 
DOS Manuale Utente e Pro- 
DOS Technical Reference 
Manual). 

Stampare 

meglio 

Dispongo di un sistema 
Apple Ile collegato tramite 
interfaccia Centronics a 
stampante Honeywell L.ll. 
Desidererei conoscere i pa¬ 
rametri della stampante da 
adottare per ottenere una 
stampa corretta; non riesco 
infatti a riprodurre su carta 
quanto appare sul monitor 
senza incorrere in tagli inde¬ 
siderati . Vorrei inoltre sape¬ 
re se è possibile gestire file 
Applewriter 1.0 con Apple- 
works. E, infine, ho trasfor¬ 
mato un programma Basic 
(ProDos) in file Apple- 


works gestendolo quindi co¬ 
me un file di testo per l’edi¬ 
ting e la stampa del listato, e 
ora vorre sapere se è possi¬ 
bile ripercorrere il cammino 
inverso, trasformare cioè un 
file Appleworks in program¬ 
ma Basic. 

Renzo Ordonselli 

Fabriano (AN) 

Vediamo di rispondere 
con ordine alle sue doman¬ 
de: 1) Potrà recuperare i co¬ 
dici dei caratteri di controllo 
per la sua stampante Honey¬ 
well L.ll dal manuale che 
accompagna la stampante o 
la sua interfaccia; ne! caso 
non fosse in possesso di tali 
manuali, li richieda al riven¬ 
ditore che le ha venduto que¬ 
sta periferica. 2) None possi¬ 
bile gestire direttamente da 
Apple Works i file creati con 
Apple Writer 1.0; tuttavia è 
possibile trasformare tali file 
con Apple Writer 2.0, e poi 
manipolarli con Apple 
Works. 3) Sì. Al termine del 
lavoro il file di testo deve es¬ 
sere stampato su disco in 
ASCII usando l'apposita vo¬ 
ce nel menù di stampa. 
Quindi tornando in Ba¬ 
sic— ProDos può recuperare 
il listato con l'istruzione 
EXEC, in modo diretto, se¬ 
guita dal nome del file stesso. 

Stampare 

Investor 

Ho comperato presso di 
voi il programma Investor 
che ho trovato abbastanza 
adatto alle mie esigenze. 
Pur riscontrando alcune im¬ 
postazioni poco elastiche, 
come il caricamento degli 
ultimi prezzi di mercato (che 
deve essere sempre reimpo¬ 
stato dal menu) o disposizio- 


Nel numero 21 di Applicando, a pagina 86, per un errore tipografico 
è stata tagliata la prima riga del listato del programma "Curve 
di Titolazione" che riportiamo qui sotto. Ce ne scusiamo con i lettori. 

1LIST1 

1 IF PEEK (104) < >64 THEN POKE 

103,1: POKE 104,64: POKE 163 
34,0: PRINT CHR* (4)j"RUN C 
UROE DI TITOLAZIONE” 


• Modem. Scambio s/w di ogni 
genere via modem esclusiva- 
mente, con computer Apple II e 
Ibm. Roberto Visconti, Via 
Manassei 19/a, 05100 Terni. 
Tel. 0744/420154. 

• Macintosh 512K, Image Wri¬ 
ter, drive esterno, numerosi 
programmi tra cui Jazz. Il 
tutto è originale e ancora in ga¬ 
ranzia (due mesi di vita). Vendo 
a lire 7.000.000 non trattabili. 
Carmelo Carrozzo, Via Genova 
7,10095 Grugliasco (TO). Tele- 
fonare dopo le 20 allo 
011/713766. 

• Causa cambio sistema vendo 
per Apple II dieci dischi doppia 
faccia con i migliori programmi 
di giochi e utilità a lire 120.000. 
Marco Pozzi, Via Cenisio 16, 
20154 Milano. Tel. 02/314151 
(dopo le 20). 

• Vendo per Apple II "Superto- 
to I.O", superprogramma toto¬ 
calcio inedito, 3 diverse opzioni 

ni antifunzionali come alcu¬ 
ni rendiconti impostati per 
stampanti con 132 caratteri 
anziché 80, credo che l’ano¬ 
malia maggiore sia dovuta ai 
problemi di stampa. La nor¬ 
malità di stampa si verifica 
solo spegnendo e subito 
riaccendendo la stampante. 
Premetto che possiedo una 
Mannesmann Tally 80 co¬ 
lonne collegata con un Ap¬ 
ple II Plus. 

Giuseppe Calabrese 
Torino 

Investor manda in stampa 
le videate che avrebbero bi¬ 
sogno di più di 80 colonne 
per essere visualizzate in mo¬ 
do soddisfacente. La stam¬ 
pante Image Writer, pur la¬ 
vorando normalmente in 80 
colonne può essere settata 
per stampare in carattere 
compresso, che dispone ap¬ 
punto di 132 colonne. I ca¬ 
ratteri di controllo utilizzati 
per settore il compresso sono 
ESC Q, da programma 


di selezione incrociate (n. segni 
1X2; consecutivi; corr. errori), 
con output n. colonne utili, svi¬ 
luppo su monitor o stampante a 
lire 60.000 con manuale. Ro¬ 
berto Rossi, Via Lario 26, 
20159 Milano. Telefonare ore 
serali allo 02/6070236. 

• Vendo riviste Applicando dal 
n. 1 al n. 16 a lire 45.000; Perso¬ 
nal Software dal n. 2 al n. 19 a 
lire 30.000; M & P Computer 
dal n. 1 al n. 40 a lire 60.000. 
Spedizione contrassegno + spe¬ 
se postali. Daniele Fonsato, Via 
Falconero/Vill. Selenia, 10057 
S. Ambrogio (TO). 

• Vendo sistema Apple //e, di 
un anno, 128 Kbyte, 2 drive disk 
//, monitor //, stampante grafi¬ 
ca, joystick, accessori, dischi, 
corredato di vastissimo softwa¬ 
re: programmi applicativi, gio¬ 
chi, utilità. Il tutto a lire 
5.500.000. Oscar Bossi. Tel. 
02/9986394. 


CHR$(27)+"Q". Per ottene¬ 
re lo stesso risultato con la 
sua stampante dovrebbe 
consultare il suo manuale 
d'uso e verificare se è possi¬ 
bile questa opzione. In caso 
affermativo è sufficiente so¬ 
stituire i caratteri di controllo 
richiesti alla linea 70 del pro¬ 
gramma. 


Ni* 


nome 


Ho letto con interesse 
l’articolo sullo UNIX pub¬ 
blicato su Applicando di No¬ 
vembre. Non ho però trova¬ 
to il produttore del pro¬ 
gramma Mac Dics citato 
nell’articolo. 

Marco Pagliani 

Milano 

Ce ne scusiamo con i letto¬ 
ri e con il produttore: Mac 
Dics è sviluppato e distribui¬ 
to dalla Società LIST, Piaz¬ 
za Mazzini 6, Pisa, telefono 
050/44023. 



Ci scusiamo con i lettori per un errore tipografico apparso 
nella tabella delle compatibilità del programma di sintesi 
vocale, pubblicato su Applicando numero 20 a pagina 37. 
Infatti, benché il programma giri tranquillamente anche 
su Apple Ile, di fatto non è possibile registrare la voce 
sul nastro, mancando Tingresso/uscita per il registratore. 
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Listati senza fatica 

Tutti i programmi di Applicando possono essere trascritti e quindi salvati su 
dischetto. Ma la trascrizione è lenta e noiosa, e sbagliare fin troppo facile. 

Ecco perché Applicando offre, già pronti, i dischetti con i programmi 
sottoindicati: per ottenerli, è sufficiente inviarci il tagliando debitamente 
compilato. 


APPLICANDO 1 

AP1/I02 Profitti. In tempo reale l'analisi del break-even point, punto di 
pareggio, di una qualsiasi azienda. Calendario perpetuo. Dal 1582 in 
poi tutto quello che si può sapere sui giorni passati e futuri. I tronchi 
del tesoro. Una spericolata caccia al tesoro a nuoto, fra le insidie di 
tronchi galleggianti. Lire 30.000 (abbonati 25.000). 

AP1/N03 Eliminatoredi Dos. Uno strumento per aumentare del 10% 
la capacità di un ncrmale floppy disk. Orologio. Per trasformare 
l'Apple II in un orologio con rintocchi, allarme e lancetta dei secondi. 
Pronti puntare fuoco! Guardiano di un castello abbandonato, hai 25 
colpi da sparare contro gli intrusi. Lire 30.000 (abbonati 25.000). 

APPLICANDO 2 

AP2/IN04 Costi chilometrici auto. Un programma per calcolare e 
confrontare i costi di qualunque auto. Richiamafigure. Posizionare, 
ingrandire, ruotare, cambiar colore, aggiungere figure a quelle di una 
tavola . Laser nello spazio. Battaglia a colpi di laser contro asteroidi e 
alieni per difendere la torretta spaziale. Lire 30.000 (abbonati 25.000). 

APPLICANDO 3 

AP3/IN05 Sistema base. Un data base modulare con tutte le caratteri¬ 
stiche essenziali per mettere ordine nei propri archivi. Etichette. Eti¬ 
chette spiritose e bizzarre, di lavoro o di ogni genere, stampate facil¬ 
mente e nel numero desiderato. Contratti. Con il WPL, il linguaggio di 
programmazione dell'Apple Writer, bastano cinque minuti per un do¬ 
cumento di pi' pagine personalizzato. Gran catalogo. Una routine per 
avere il catalogo del dischetto su due colonne, 42 file per volta, e 
richiamarli con un solo tasto. Lire 30.000 (abbonati 25,000). 

AP3/A06 Equo canone (occorre Visicalc). In Visicalc un modello che 
permette, a inquilini o proprietari, l'esatto calcolo dell'equo canone. 
Lire 25.000 (abbonati 20.000). 


Sistema base - AP3/IN05 

Un data base modulare che ha 
il pregio di costare pochissimo 
e di offrire possibilità operative 
che nemmeno programmi 
di costo molto superiore hanno. 



APPLICANDO 4 

AP4/N07 Lettura sprint (versione italiana e versione con frasi in 
inglese). Un reading improver per leggere di più a parità di tempo. 
Rompiquindici. Il piccolo rompicapo delle quindici pedine da ordinare 


nei sedici spazi a disposizione. Tastierino fantasma, una routine per 
avere a disposizione un tastierino numerico anche sull’Apple //. Routi¬ 
ne di input. Due subroutine, una per i dati numerici l'altra per gli 
alfanumerici, per il controllo dell'input. Lire 30.000 (abbonati 25.000). 

AP4/A09 Organo, violino, pianoforte (dischetto Pascal, occorre lan- 
guage card o Apple //e o //c). Ecco come, col Pascal, si riesce a 
simulare i tre strumenti attivando l'altoparlante dell’Apple da program¬ 
ma. Lire 30.000 (abbonati 25.000). 

APPLICANDO 5 

AP5/N08 Investor. In tempo reale il quadro esatto di come vanno i 
propri investimenti finanziari. Con cinque prospetti riepilogativi e 52 
periodi di quotazione, Investor è uno dei programmi più completi in 
questo settore e in assoluto il più economico. Lire 70.000 (abbonati 
60.000). 

AP5/N09 Agenda personale. Per ricordare ora per ora gli appunta¬ 
menti di un anno intero memorizzando fino a 15 appunti ogni giorno. 
Duello d’artiglieria. Vince chi sa calcolare meglio la velocità del 
vento, la gittata e l’elevazione della canna. Mele e freccette. Versione 
computerizzata del popolare gioco delle freccette che nulla toglie al 
gusto del far centro. Lire 30.000 (abbonati 25.000). 


APPLICANDO 6 

AP6/N10 Obbligazioni/Bond Manager. Per avere un quadro comple¬ 
to e concreto dei rendimenti dei titoli a reddito fisso. PucMan/Nibbler. 
Versione in alta risoluzione per Apple del famoso videogame a getto¬ 
ne. Line finder. Letteralmente trova righe, questa utility permette di 
localizzare facilmente i segmenti di un programma. Lire 30.000 (abbo¬ 
nati 25.000). 

AP6/N11 Stress. In Pascal (occorre language card o Apple Ileo Ile). 
Per giocare, ma soprattutto per inventare giechi, il programma si pone 
in alternativa agli usuali videogame. Lire 55.000 (abbonati 45.000). 


APPLICANDO 7 

AP7/N12 Apple pittore. Si possono realizzare sullo schermo capola¬ 
vori di pittura, ottenendo effetti speciali di grande efficacia. Ottovolan¬ 
te. Un tutorial per insegnare ai bambini a riconoscere i numeri che 
rimbalzano sullo schermo. Diskblock. Una routine che permette di 
evitare che qualche curioso possa avere libero accesso in programmi 
riservati Archivio per Apple. Peravere un back-updei programmi più 
importanti da dischetto a cassetta o viceversa. Discoteca. Una banca 
dati che tiene sotto controllo la collezione di longplaying e di cassette. 
Aiuto. Alla fine della battitura di un programma, Aiuto vi dirà quanti 
errori ci sono e a quali linee. Lire 30.000 (abbonati 25.000). 


APPLICANDO 8 

AP8/N13 Cambiacomandi/Messaggi. Un programma che insegna 
come personalizzare i messaggi propri del Dos dell'Apple. Le Mans. 
Un gran premio di formula uno da giocare in due o da soli contro il 
computer. Appleorgano. Una combinazione di linguaggio macchina e 


(Continua a pag. 118) 
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di Applesoft che trasforma l'Apple in un melodioso organo. Lire 30.000 
(abbonati 25.000). 

AP8/T14 Momento di una forza/Colpo all'asta. La dimostrazione 
didattica del ribaltamento di un corpo solido appoggiato a un piano 
quando viene applicata una forza orizzontale che supera il momento in 
senso opposto dovuto al peso Hard copy pagine in alta risoluzione. 
Se la stampante risponde a determinati criteri di compatibilità, con 
questo programma si possono far miracoli. Lire 30.000 (abbonati 
25.000). 

APPLICANDO 9 

AP9/N15 Fuoco fatuo. Un appassionante adventure game con un 
persorso intricatissimo, mille trabocchetti, un troll e una principessa. 
Apple artista. Per destreggiarsi nella grafica ad alta risoluzione usan¬ 
do lo schermo come tavolozza e la tastiera come pennello. Data hello. 
Una semplice routine che permette di disporre di una clock card 
inizializzando i dischetti con giorno, mese e anno. Lire 25.000 (abbo¬ 
nati 20.000). 

AP9/T16 Sistema di forze parallele. Fissandone l'intensità e la posi¬ 
zione questo programma permette di visualizzare il centro di un siste¬ 
ma di forze sotto forma numerica e grafica. Traslazione e rotazione 
di una figura piana. Come far ruotare, traslare, rimpicciolire, ingrandi¬ 
re sul video una figura piana. Lire 30.000 (abbonati 25.000). 

APPLICANDO 10 

API 0/N14 Ripristino. Come ripristinare programmi persi per un'acci¬ 
dentale istruzione di New o di Fp. Disk Map. Un detective del Dos per 
scoprire dove e come vengono immagazzinati i dati analizzando la 
mappa dei bit occupati. Autonumber. Una routine per autonumerare 
automaticamente i programmi e allineare le linee con un ritorno carrel¬ 
lo in input. Lire 30.000 (abbonati 25.000). 

AP10/T17 Rette nel piano cartesiano. Come individuare in cinque 
modi diversi una coppia di rette in un piano cartesiano e avere visualiz¬ 
zate le equazioni relative ai valori assegnati. Statistica. Come analiz¬ 
zare la correlazione fra due fenomeni o due caratteri e l’indice o 
coefficiente di Bravais che ne effettua la misura. Lire 30.000 (abbonati 
25.000). 

APPLICANDO 11 

API 1/N18 Apple edicola. Una banca dati per avere sotto controllo un 
articolo, il suo numero di pagina, la rivista su cui è stato pubblicato. 
Disk Zap. Il programma indispensabile per il debugging di un dischetto 
che ne risolve la maggior parte dei problemi. Messaggi personali. 
Quando la persona non c'è, per lasciare un messaggio basta impo¬ 
starlo sulla tastiera. L'Apple farà il resto. Comparatore di programmi 
in basic. Una routine per risolvere dubbi sulle diverse versioni di uno 
stesso programma. Trappola per pochi. Un cacciatore contro tre 
animali feroci. Vince chi riesce a intrappolare senza essere intrappola¬ 
to. Lire 30.000 (abbonati 25.000). 

AP1 1 /TI 9 Espressioni. Come risolvere un piccolo dramma familiare 
con l'aiuto di un elaboratore personale. Lire 25.000 (abbonati 20.000). 

APPLICANDO 12-13 

API 2/N20 Bridge. Un programma in altissima risoluzione grafica che 
permette di imparare il bridge o di giocarlo contro il computer. Micro- 
cale. Un foglio elettronico di calcolo, spreadsheet, che mette a disposi¬ 
zione 20 righe per 20 colonne per un totale di 400 caselle da riempire 
come si vuole. Applesoft Line Editor. Una potente utility che permet¬ 
te l'editing dei programmi in Applesoft e aggiunge all'Apple un più 
ampio controllo del cursore. Lire 30.000 (abbonati 25.000). 

AP12/A21 Budget (occorre Appleworks). Un prospetto che con l'inse¬ 
rimento di dati mensili e di medie preventive calcola automaticamente 
le medie consuntive e i relativi saldi mensili e annui. Lire 15.000, 
AP12/A22 Budget (occorre Visicalc). Un prospetto che con l'inseri¬ 
mento di dati mensili e di medie preventive calcola automaticamente le 
medie consuntive e i relativi saldi mensili e annui. Lire 15.000. 

AP12/A23 Cinque modelli Spreadsheet, tre modelli data base, due 
modelli Word Processor. Versione per Appleworks. Due dischetti. Lire 
80.000 (abbonati 70.000). 


AP12/A24 Cinque modelli Spreadsheet. Versione per VISICALC. Lire 
40.000 (abbonati 35.000). 

AP12/T25 Animazione di una rotazione tridimensionale. Un esem¬ 
pio di come una rotazione tridimensionale permette di rappresentare 
gli oggetti proprio come li vediamo. Trasformazione da File a Data. 
Una utility per risolvere il problema di aggiungere a un programma 
preesistente delle istruzioni DATA ricavati da un altro file. Lire 25.000 
(abbonati 15.000). 


AP14/N26 Golf. Un programma in altissima risoluzione grafica che 
permette di disegnare il proprio percorso di golf per poi giocarci a 
piacimento con gli amici. Autopiù. Con l'aiuto di questo programma 
non dimenticherete più gli appuntamenti fissi dedicati alla manutenzio¬ 
ne della vostra automobile. Lire 20.000. 

AP14/N27 Applebaby. Tre giochi didattici: il primo per imparare a 
contare in età prescolastica; il secondo per ripassare le tabelline; il 
terzo per esercitarsi nell'ortografia. Lire 20.000. 

AP14/A28 Rimborso spese, (occorre Appleworks). Un prospetto che 
vi permette di preparare le vostre note spese automaticamente in 
cinque minuti. Lire 15.000. 

AP14/A29 Rimborso spese, (occorre VisiCalc). Un prospetto che vi 
permette di preparare le vostre note spese automaticamente in cinque 
minuti. Lire 15.000. 

AP14/T30 Frutteti. Un aiuto a risolvere uno dei più classici problemi di 
estimo. Instant Poster Voi scrivete con la tastiera del vostro Apple la 
frase che volete, e subito dalla stampante esce un poster formato 
gigante. Lire 15.000. 


AP15/N31 Sintetizzatore di suoni. Con questo programma potete 
dotare i vostri lavori di una colonna sonora eccezionale; permette 
infatti la sintetizzazìone dei suoni più diversi: dal canto dell’uccellino, 
alla mitragliatrice, da treno in corsa all’aereo, e tantissimi altri, compre¬ 
sa la musica. Volano. Un gioco in alta risoluzione per due sfidanti. 
Illustratore. Un programma di grafica che offre la possibilità di realiz¬ 
zare ottimi disegni anche a chi non è troppo ferrato in materia. Auto¬ 
schermo. Crea in automatico videate di presentazione dei programmi 
inseriti in un dischetto; dall’aspetto molto professionale, evidenzia 
infatti i programmi con una barra luminosa comandabile con le frecce e 
fa partire il programma cosi evidenziato con un semplice Return. Lire 
30.000. 

AP15/A32 Computer cuisine. Un ricettario computerizzato sul quale 
memorizzare ingredienti e ricette a centinaia, eliminando cosi sia il 
fastidio di mille pezzetti di carta sparsi per i cassetti, sia il pericolo di 
perdersi preziose ricette. Con possibilità di stampa delle singole ricette 
e un menù completo dei migliori piatti creati da Gualtiero Marchesi, il 
più famoso cuoco d'Italia, Occorre scheda 80 colonne. Lire 20.000. 

AP15/T33 Euclide. Il massimo comun divisore e il minimo comune 
multiplo in un programma che ne permette l'immediata comprensione. 
Isomeri. Fa parte del più ampio progetto americano Seraphim, per lo 
studio della chimica. Lire 15.000 


AP16/N34 Dieta personalizzata. Con questo programma, un pratico 
sistema di Data Base nutrizionale, è possibile personalizzare, a se¬ 
conda della propria costituzione fisica e delle abitudini alimentari, una 
dieta bilanciata, a lungo o a breve termine. Il dischetto contiene un file 
dati di 400 cibi, la cui composizione è analizzata in calorie, proteine, 
grassi, vitamine, colesterolo. Lire 25.000. 

AP16/N35 Designer. Il concetto dei potenti e costosi programmi di 
CAD/CAM alla portata dell Apple //, per fare del computer uno stru¬ 
mento per disegnare semiprofessionale. Il gioco dei pompieri. E' 
scoppiato un incendio, e voi siete un pompiere che deve salvare il 
maggior numero di persone prima che muoiano soffocate tra le fiam¬ 
me. Se sbagliate tre volte, sarete nei guai: il severo comandante .. Per 
listare bene in vista. Programmare è divertente, creativo, affascinan¬ 
te. Ma talvolta bisogna tornare sul listato per correggere e modificare 
qualcosa. Allora può capitare di pentirsi di aver preferito la compattez¬ 
za alla chiarezza. A meno che non si faccia uso di questo programma. 


APPLICANDO 15 


APPLICANDO 14 


APPLICANDO 16 
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Timer. Un efficace programma per trasformare l'Apple // in un fedele e 
preciso contasecondi che avverte del passare del tempo, e al momen¬ 
to giusto... Lire 25.000. 

API 6/N36 Cento One-liner. Utilities, routines, dimostrativi di grafica e 
di suoni, e perfino giochi. Cento programmi su un solo dischetto, tutti 
rigorosamente scritti in una sola linea dì Basic. Da usare così come 
sono, da studiare come esempi di sintesi, o da trasferire nei vostri 
programmi. Lire 25.000. 

AP16/N37 Rubrica telefonica. (Occorre AppleWorks). Un'agenda 
telefonica che individua in tempo reale qualunque numero memorizza¬ 
to, che stampa le etichette per spedire gli auguri di Natale e di Pasqua 
solo a chi volete voi, che seleziona, con molteplici possibilità, gruppi di 
nominativi e stampa elenchi su carta da distribuire aggiornati ogni 
mese ai collaboratori. Lire 15.000. 

APPLICANDO 17 

AP17/N38 Strade d’America. Pianifica un qualunque itinerario stra¬ 
dale americano tra ben 171 città diverse, fornendo le sigle delle strade 
da percorrere, l'elenco delle città intermedie e calcola la distanza in 
miglia dei tratti intermedi e la distanza totale dalla città di partenza a 
quella d'arrivo. Uragano. Su una piccola città indifesa una tempesta si 
abbatte implacabile: distruggerà tutte le case e uccìderà ogni abitante, 
in un crescendo di violenza incontrastabile. Un rifugio ci sarebbe, ma 
come raggiungerlo? Non c'è proprio speranza. A meno che... Gioco ad 
altissima risoluzione grafica. Lire 30.000. 

AP17/N39 Regress. Ideale per manipolare dati con funzioni statisti¬ 
che, questo programma è destinato soprattutto a chi ha bisogno di uno 
strumento veloce per eseguire analisi di carattere statistico, con la 
conseguente possibilità di chiedere previsioni in base all’andamento 
delle regressioni sui dati inseriti. Calcolatrice RPN. Con questo pro¬ 
gramma, l'Apple diventa una sofisticata calcolatrice che impiega per 
l'input la notazione polacca inversa, con una catasta operativa di 
quattro registri, e permette calcoli complessi. Sparate a vista. Siete 
appostati contro un muro e comandate un potente cannone atomico 
...ad aria. Dal cielo fluttuano oggetti non meglio identificati: alcuni 
lentamente, altri un po' meno. Voi, questi oggetti, dovete respingerli. 
Peccato, però, che dall'altra parte ci sia un avversario con un altro 
cannone... Lire 25.000. 

AP17/A40 I conti del negozio. (Occorre AppleWorks). Diviso in due 
file, simili per impostazione ma diversi per utilizzo, questo modello di 
Spreadsheet è utilissimo per seguire l'andamento giornaliero e mensi¬ 
le di un negozio. All'apertura del negozio coincide l'apertura di un 
foglio vuoto del modello: per ogni movimento di cassa è possibile 
memorizzare la causale, il tipo di pagamento e a cosa si riferisce. Il 
computer calcola i totali per ogni voce e indica quale è stato il movi¬ 
mento di cassa giornaliero, tenendo conto degli ordini e dei saldi per 
impegni precedenti. Un'ultima sezione elabora i dati suddivisi per 
categorie merceologiche e calcola le percentuali di ripartizione degli 
utili su ogni articolo. Lire 50.000. 

AP17/A41 I conti del negozio. (Occorre VisiCalc). Lo stesso di 
AP17/A40, ma con VisiCalc. Lire 50.000. 
















APPLICANDO 18 

AP18/N41 Trivia. Stregherà milioni di italiani facendoli giocare, la 
novità che viene dall'America: sì chiama Trivial Pursuit ed è destinato a 
diventare il gioco dell'anno. Per sperimentarlo in anteprima, Applican¬ 
do ne propone una versione per Apple //, per di più personalizzabile e 
quindi utile anche per studiare o ripassare, oltre che per divertirsi... 
Bioritmi. Ci sono giornate in cui conviene non uscire nemmeno di 
casa, perché va tutto storto; e ci sono giorni baciati dal destino in cui si 
naviga sull'olio. Sarebbe bello conoscerli in anticipo e organizzarsi 
meglio la vita. Con questo programma si può seguire l'andamento dei 
propri bioritmi: tutti e tre i cicli, mese per mese. Occhio ai consumi. 
Volete sapere quanto consuma la vostra auto? Potete annotare dili- • 
gentemente la percorrenza e i litri di carburante e poi fare i relativi 
calcoli. Oppure, molto più semplicemente, caricare su Apple questo 
programma, utile per valutare anche altri tipi di consumi... Lire 25.000. 

AP18/N42 Regolatore del bip. Ci sono momenti in cui il //e, con tutti 
quei suoi bip, sembra ridere dei nostri errori. Che fare? Spegnerlo e 
uscire a fare due passi? Cambiarlo con il //c, che ha il volume regolabi¬ 
le? Mettersi i tappi nelle orecchie? No, la soluzione è un 'altra, semplice 
e davvero simpatica... e soprattutto funziona! Comparatore di grafici. 
Avere il grafico di una funzione può essere inutile se poi non si 
possono esaminare i particolari del suo andamento in una certa zona. 

Se poi si deve vedere la differenza tra due curve diverse c'è da fare un 
difficile e poco preciso lavoro di comparazione. A meno di non utilizza¬ 
re questo programma che... Impaginatore di messaggi. Per avere le 
scritte perfettamente centrate sia sul video che sulla stampante occor¬ 
re tanta pazienza e tanto occhio. Oppure avere in memoria questo 


Nuova opportunitài y 
per i nostri 
lettori ! 


ABBONAMENTO 

RL 

DISK SERDICE 


Applicando è lieto di offrire ai propri lettori 
la possibilità di sottoscrivere 
un abbonamento a 5 o 10 dischetti, a scelta 
fra tutti quelli presentati nel Disk Service 
a un prezzo eccezionalmente vantaggioso: 

100.000 lire per 5 dischetti 

180.000 lire per 10 dischetti 

In pratica pagherete, rispettivamente, 
20.000 lire o 18.000 lire a dischetto, 

Iva e spese di spedizione comprese 

qualunque sia il prezzo 
di vendita del singolo dischetto 

Basta che compiliate il tagliando qui sotto e lo 
inviate a Applicando, abbonamenti Disk Service, 
Corso Monforte 39 - 20122 Milano, 
unitamente a un assegno non trasferibile 
intestato a Editronica srl e al vostro primo ordine. 

Per ordinare i dischetti, adesso 
e successivamente, utilizzate il buono d’ordine 

pubblicato alla pagina seguente, 
specificando sempre che siete un abbonato 
del Disk Service. L'abbonamento non ha 
una scadenza, e quindi i 5 o 10 dischetti potete 
ordinarli nell'arco di tempo che più vi aggrada. 


Sì desidero sottoscrivere il seguente 
abbonamento al Disk Service: 

| 5 dischetti, per un importo di 100.000 lire 

□ 10 dischetti, per un importo di 180.000 lire 


Nome. 

Cognome. 

Indirizzo. 

Città. 

Cap.PV. 


(Continua a pag.120 ) 


.Firma. 



































applicando 



Disk Service 



impaginatore che, all'occorrenza, può servire anche da word proces¬ 
sor. Utility per PcoDOS. Prefix, Subdirectory, Pattinarne? Sono 
termini che bisogna conoscere per programmare in ProDOS. Questa 
utility non solo aiuterà a capire e imparare con facilità, ma, soprattut¬ 
to... Lire 25.000. 

APPLICANDO 19 

API 9/N43 Oracolo. Comperare una casa? Cambiare lavoro? Conclu¬ 
dere o no quell'affare? Alcune scelte sono così importanti, legate a 
condizioni così complesse, che per decidere tra le alternative possibili, 
l'umana saggezza a volte non basta. Ci vogliono freddezza e distacco, 
per suddividere il problema nelle sue componenti allo scopo di analiz¬ 
zarle separatamente. Il primo programma di tipo decision maker di¬ 
sponibile in Italia. Digger. A differenza dei giochi di labirinto di tipo 
tradizionale, Digger vi chiede di risolvere dei rompicapi spaziali, e la 
prontezza di riflessi non è tra i fattori del gioco... I marziani, inoltre, non 
sono vostri nemici, anzi, i marziani siete voi... Claustrofobia. Non 
distruggete gli alieni, limitatevi a controllare che stiano tranquilli! Que¬ 
sto gioco in alta risoluzione, pacifista nei risultati, ma non nei metodi, 
mette alla prova l'abilità del giocatore, che deve schivare le bombe 
mentre spara contro gli alieni, per incolonnarli con ordine. Ma attenzio¬ 
ne che non vi incastrino, perché soffrite di claustrofobia. Gestione 
puntatori. Volete caricare in memoria un progamma in Applesoft al 
disopra di questo o quel codice in linguaggio macchina? Magari aggi¬ 
rando la memoria di schermo in alta risoluzione? 0 addirittura in cima a 
un codice ormai servito al suo scopo in un programma che sta giran¬ 
do? O annullare un FP battuto per errore? Con questo programma, 
tutto è possibile Grafica in doppia risoluzione. Tre routine in Basic e 
una in Assembler che vi permetteranno di creare prorammi in doppia 
alta risoluzione con 16 colori. Sei soluzioni. Il programma, proposto 
nell'ambito del Progetto Seraphim, è un test che consiste nel presenta¬ 
re allo studente quantità limitate di un certo numero di soluzioni in 
provette numerate. Lo studente conosce le sostanze presenti e deve, 
usando esclusivamente le soluzioni a disposizione, identificare il con¬ 
tenuto di ciascuna provetta. Lire 30.000. 

APPLICANDO 20 

AP20/N44 Salute. Purtroppo il medico di famiglia non esiste più (ma 
se ce n é ancora qualcuno, si affretti a usare questo programmai): 
vaccinazioni da un lato, malattie dall'altro, analisi, terapie e soprattutto 
costi a non finire. Come ricordare tutto, registrare e listare le spese 
mediche di tutti i familiari? E al momento di pagare le tasse, poi... 
Variabili. Volete caricare in memoria un programma in Applesoft al di 
sopra di questo o quel codice macchina? O addirittura in cima a un 
codice ormai servito al suo scopo in un programma che sta girando? 
Oppure... Grafica. Che cosa sono le figure a blocco? Perché è impor¬ 
tante farne la conoscenza? Per chi possiede l'Apple //c o il //e con 
scheda 80 colonne continua l’entusiasmante viaggio nel mondo del¬ 
l’altissima definizione. Impariamo in questo numero a duplicare sul 
video la piccola immagine di un'astronave aliena. Simulazione di un 
equilibrio. Eccoci alla terza puntata dedicata al progetto Seraphim In 
questo numero un software didattico che crea la simulazione al com¬ 
puter di un problema di equilibrio. Lire 25.000. 

AP20/N45 Oroscopo. Dedicato soprattutto a chi agli oroscopi non 


crede, forse questo programma può riuscire a far cambiare loro idea... 
Scientificamente fondato, permette la creazione di una carta del cielo 
natale che nulla invidia ai grafici tracciati dai professionisti. E le tabelle 
con latitudini, longitudini, fusi orari eccetera? Ci sono, ci sono... Voce. 
Ora non gli manca più la parola: con questa routine in linguaggio 
macchina l'Apple può finalmente pronunciare tutto quello che volete. 
Cos'ha di diverso dagli altri programmi del genere? L'estrema sempli¬ 
cità, la totale trasparenza... L.30.000. 

APPLICANDO 21 

AP21 /N46 Architetto. Arredare bene la propria casa e il proprio ufficio 
è importantissimo... senza fare troppa fatica, però, e senza spenderci 
troppo denaro. Un programma per studiare sul video la disposizione di 
mobili, porte, finestre e muri, spostandoli a piacere, modificandone le 
dimensioni, duplicandoli, facendoli ruotare.. E poi, naturalmente, 
stampando il tutto. Autocorsa. A tutta birra lungo una pista diroccata, 
con vere e proprie voragini e massi da schivare. A ogni videata cambia 
la difficoltà del percorso, e la sosta ai box riserva qualche interessante 
sorpresa. By-pass per il dump. Una scorciatoia, finalmente, per 
accedere alla routine di stampa, e solo a quella, senza bisogno di 
attraversare prima tutto il programma: basta by-passarlo! Cursore. 
Per lo spostamento del cursore Apple usa gli ingombranti comandi 
HTAB e VTAB: è invece possibile utilizzare speciali caratteri di control¬ 
lo nelle stringhe stampate, grazie a questo programma in codice 
macchina. Grafica. Un altro passo avanti verso la perfetta padronanza 
della grafica in altissima risoluzione: come animare sullo schermo le 
figure a blocchi e come dare l’impressione che scorrano dietro un altro 
oggetto. Curve di titolazione. Interessa gli studenti (e gli insegnanti) 
di chimica questo programma del Progetto Seraphim: inserite le debite 
variabili, e assegnato il nome all'acido che si sta studiando, traccia sul 
piano cartesiano la relativa curva di titolazione. Permette allenamenti 
succosi e intensivi senza troppe perdite di tempo. Lire 30.000. 

APPLICANDO 22 

AP22/N47 Impegni. Che le polizze scadono si sa: il problema è 
ricordarsi quando. E lo stesso vale per anniversari e compleanni. Per 
avere sempre sotto gli occhi un promemoria elettronico, ecco un 
calendario da scrivania intelligente. Azzardo. Il computer diventa 
mazziere di Blackjack, in una simulazione che ricalca fedelmente il 
funzionamento delle slot machine di Las Vegas, Sono previsti infatti 
anche gli special... Effetti speciali. L’importanza di una gradevole 
presentazione non va sottovalutata, quando si realizza un program¬ 
ma. Spinner consente lo scorrimento orizzontale di una stringa, alla 
velocità voluta, per vivacizzare un menù, un titolo, oppure. Calenda¬ 
rio. Non si possono tenere in ufficio decine di calendari, né si possono 
sempre fare complessi calcoli sugli anni a venire; spesso però c'è 
bisogno di sapere come si corrispondono date e giorni della settimana, 
anche in anni lontani... Ecco un calendario perpetuo, perfetto, veloce e 
sempre pronto. Grafica. Creare intere immagini e figure a blocco sullo 
schermo Hi-Res, e poi animarle. Un’ultima nota tecnica sul funziona¬ 
mento della doppia alta risoluzione prima di passare a divertenti routi¬ 
ne applicative. Chimica. Il famoso numero di Avogadro e il concetto 
quantitativo di mole: la visualizzazione aiuta a spiegarli e ad appren¬ 
derli meglio. Lire 30.000. 


Compilare e spedire il tagliando qui sotto a Applicando, Editronica Srl., Corso Monforte 39, 20122 Milano 


Vogliate inviarmi i seguenti dischetti: 


n. 

1 A 

Pi 
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1 1 

1 1 
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1 A 
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1/ 
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1 1 
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1 1 
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1 A 
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1 1 


n. 

1 A 

Pi 

1/ 

1 1 

1 1 

n. 

IaJ 

lPI 

Al 

IL 



Sono abbonato: sì □ non 
120 


Cognome. Nome. 

Via. Cap. 

Città. Prov. 

Scelgo la seguente formula di pagamento: 

□ allego assegno di L.non trasferibile intestato a Editronica srl. 

□ allego ricevuta versamento di L. sul cc/p n. 19740208 intestato a 

Editronica srl. - Corso Monforte, 39 - 20122 Milano 

□ pago fin d'ora l’importo di L. con la mia carta 

di credito Bank Americard N. 

scadenza.autorizzando la Banca 

d’America e d’Italia ad addebitarne l’importo sul mio conto BankAmericard. 

Data. Firma. 


I 

1 













































informatica 

presenta 

E KEYDATA 

L'EVOLUZIONE CHE GIRA NEL TEMPO 





GI-ERRE INFORMATICA s.r.l. 
42100 REGGIO EMILIA VIA UMBRIA 36/A TEL. 0522 38655 • 512345 
70125 BARI VIA MONTE S. MICHELE 2/B TEL. 080 415975 
95100 CATANIA P.ZZA GALATEA 2 TEL. 095 375222 
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I MINIDISKETTE 5"V* KEY-DATA SONO DISPONIBILI 
IN VARIE COLORAZIONI 














LA NUOVA 



DISK'-'*ORY 


SINTONIZZATI CON IL RAINBOW DISK 


nuove tecnologie per migliori prestazioni 
a più lunga durata. 

Una superficie levigatissima testata a piena 
larghezza, uno speciale jacket autopulente 
indeformabile a grammatura calibrata. 
RAINBOW DISK: NUOVE SINTONIE 

per dischetti ad alta fedeltà Jj 

r una ma: i affid ilità. 


RAINBOW CERCA I SUOI DISTRIBUTORI ESCLU: 


mppC Memorie 

IVICC per Elaboratori Elettronici s. 

LA SCELTA PIÙ LOGICA 

Forniture per Centri Elaborazione Dati 
Sede Amm.va; 20144 Milano ■ Via Boni, 29 
Tel, 4988541 (4 linee r.a.) - Telex 324426 MEE - I 
Filiali e Agenzie: Milano ■ Bergamo • Torino • 

Biella ■ Padova • Parma • Bologna • Firenze - Ancona - 
Roma • Napoli - Catania • Oristano - Bari • Genova - 
Bolzano ■ Mestre • 


A NORME ANSI, ECMA, ISO, JIS, UBM E SHUGART. 













